+++ /dev/null
-diff -ur fortune-mod-9708/fortune/fortune.6 fortune-mod-9708-/fortune/fortune.6
---- fortune-mod-9708/fortune/fortune.6 Mon Apr 24 20:16:52 1995
-+++ fortune-mod-9708-/fortune/fortune.6 Tue Jun 4 17:54:23 2002
-@@ -110,6 +110,8 @@
- number of characters in the message.
- This is useful if it is executed as part of the logout procedure
- to guarantee that the message can be read before the screen is cleared.
-+.It Fl d
-+Display source of fortune before it (i.e. file it comes from in []).
- .El
- .Pp
- The user may specify alternate sayings.
-diff -ur fortune-mod-9708/fortune/fortune.c fortune-mod-9708-/fortune/fortune.c
---- fortune-mod-9708/fortune/fortune.c Tue Jun 4 17:55:30 2002
-+++ fortune-mod-9708-/fortune/fortune.c Tue Jun 4 17:47:52 2002
-@@ -168,6 +168,7 @@
- bool Offend = FALSE; /* offensive fortunes only */
- bool All_forts = FALSE; /* any fortune allowed */
- bool Equal_probs = FALSE; /* scatter un-allocated prob equally */
-+bool Display_source = FALSE; /* display [fortune-file] before fortune */
-
- #ifndef NO_REGEX
- bool Match = FALSE; /* dump fortunes matching a pattern */
-@@ -232,7 +233,7 @@
- #ifndef NO_REGEX
- (void) fprintf(stderr, "i");
- #endif /* NO_REGEX */
-- (void) fprintf(stderr, "losw]");
-+ (void) fprintf(stderr, "loswd]");
- #ifndef NO_REGEX
- (void) fprintf(stderr, " [-m pattern]");
- #endif /* NO_REGEX */
-@@ -709,9 +710,9 @@
- ignore_case = FALSE;
-
- #ifdef DEBUG
-- while ((ch = getopt(argc, argv, "aDefilm:n:osvw")) != EOF)
-+ while ((ch = getopt(argc, argv, "aDefilm:n:osdvw")) != EOF)
- #else
-- while ((ch = getopt(argc, argv, "aefilm:n:osvw")) != EOF)
-+ while ((ch = getopt(argc, argv, "aefilm:n:osdvw")) != EOF)
- #endif /* DEBUG */
- switch (ch)
- {
-@@ -733,6 +734,9 @@
- Long_only++;
- Short_only = FALSE;
- break;
-+ case 'd':
-+ Display_source++;
-+ break;
- case 'n':
- SLEN = atoi(optarg);
- break;
-@@ -1213,6 +1217,9 @@
- register char *p, ch;
- unsigned char line[BUFSIZ];
-
-+ if (Display_source)
-+ printf("[%s]\n\n", fp->name);
-+
- open_fp(fp);
- fseek(fp->inf, (long) Seekpts[0], 0);
- for (Fort_len = 0; fgets(line, sizeof line, fp->inf) != NULL &&