From 46124264131ac812c5b47963b125738b147b0732 Mon Sep 17 00:00:00 2001 From: "Edward M. Reingold" Date: Sun, 30 Oct 1994 00:26:39 +0000 Subject: [PATCH] Fix use of noday option for calendar-read-date. --- lisp/calendar/lunar.el | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/lisp/calendar/lunar.el b/lisp/calendar/lunar.el index 715d5012ee1..3167135d445 100644 --- a/lisp/calendar/lunar.el +++ b/lisp/calendar/lunar.el @@ -223,8 +223,7 @@ If called with an optional prefix argument, prompts for month and year. This function is suitable for execution in a .emacs file." (interactive "P") (save-excursion - (let* ((completion-ignore-case t) - (date (if arg + (let* ((date (if arg (calendar-read-date t) (calendar-current-date))) (displayed-month (extract-calendar-month date)) -- 2.11.4.GIT