From edbf26946d4c9db29264ad4f78291b324f0e833d Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Fri, 11 Apr 1997 02:34:37 +0000 Subject: (diary-persian-date): Use `date'. Add some additional text at the end. --- lisp/calendar/cal-persia.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'lisp/calendar/cal-persia.el') diff --git a/lisp/calendar/cal-persia.el b/lisp/calendar/cal-persia.el index 89269526be8..99022af061c 100644 --- a/lisp/calendar/cal-persia.el +++ b/lisp/calendar/cal-persia.el @@ -199,7 +199,7 @@ Echo Persian date unless NOECHO is t." (defun diary-persian-date () "Persian calendar equivalent of date diary entry." - (calendar-persian-date-string (calendar-cursor-to-date t))) + (format "Persian date: %s" (calendar-persian-date-string date))) (provide 'cal-persia) -- cgit v1.2.1