diff options
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/calendar/diary-lib.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/calendar/diary-lib.el b/lisp/calendar/diary-lib.el index 679c4b991b6..fdade091ab2 100644 --- a/lisp/calendar/diary-lib.el +++ b/lisp/calendar/diary-lib.el | |||
| @@ -80,7 +80,7 @@ Searches for entries that match ARG days, starting with the date indicated | |||
| 80 | by the cursor position in the displayed three-month calendar. | 80 | by the cursor position in the displayed three-month calendar. |
| 81 | D-FILE specifies the file to use as the diary file." | 81 | D-FILE specifies the file to use as the diary file." |
| 82 | (interactive | 82 | (interactive |
| 83 | (list (if arg (prefix-numeric-value arg) 1) | 83 | (list (prefix-numeric-value current-prefix-arg) |
| 84 | (read-file-name "Enter diary file name: " default-directory nil t))) | 84 | (read-file-name "Enter diary file name: " default-directory nil t))) |
| 85 | (let ((diary-file d-file)) | 85 | (let ((diary-file d-file)) |
| 86 | (view-diary-entries arg))) | 86 | (view-diary-entries arg))) |