summaryrefslogtreecommitdiff
path: root/lisp/calendar/diary-lib.el
diff options
context:
space:
mode:
authorGlenn Morris <rgm@gnu.org>2004-12-20 18:09:22 +0000
committerGlenn Morris <rgm@gnu.org>2004-12-20 18:09:22 +0000
commit7450d79962401a0712ac9a3e5bcc9570f4fe59f0 (patch)
treefa48c41c76f41665a7f23cbe8501aa2f852522a6 /lisp/calendar/diary-lib.el
parentb2fb46340334024e55e784a3e008dc2167169595 (diff)
downloademacs-7450d79962401a0712ac9a3e5bcc9570f4fe59f0.tar.gz
(view-other-diary-entries): Use current-prefix-arg in interactive spec.
Diffstat (limited to 'lisp/calendar/diary-lib.el')
-rw-r--r--lisp/calendar/diary-lib.el2
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
by the cursor position in the displayed three-month calendar.
D-FILE specifies the file to use as the diary file."
(interactive
- (list (if arg (prefix-numeric-value arg) 1)
+ (list (prefix-numeric-value current-prefix-arg)
(read-file-name "Enter diary file name: " default-directory nil t)))
(let ((diary-file d-file))
(view-diary-entries arg)))