From 4980d28f5a36afd0228803c9bb97de4547eff25f Mon Sep 17 00:00:00 2001 From: Glenn Morris Date: Sun, 25 May 2008 20:09:23 +0000 Subject: [PATCH] Ed Reingold (diary-hebrew-yahrzeit): Use diary-ordinal-suffix. --- lisp/ChangeLog | 5 +++++ lisp/calendar/cal-hebrew.el | 6 ++---- 2 files changed, 7 insertions(+), 4 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 169a2a769d8..fe81ecc5a84 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2008-05-25 Ed Reingold + + * calendar/cal-hebrew.el (diary-hebrew-yahrzeit): + Use diary-ordinal-suffix. + 2008-05-24 Juanma Barranquero * emacs-lisp/edebug.el (edebug-setup-hook, edebug-all-defs) diff --git a/lisp/calendar/cal-hebrew.el b/lisp/calendar/cal-hebrew.el index 21cd9df9011..260a6bd757a 100644 --- a/lisp/calendar/cal-hebrew.el +++ b/lisp/calendar/cal-hebrew.el @@ -862,10 +862,8 @@ use when highlighting the day in the calendar." entry (if (= y d) "" " (evening)") diff - (cond ((= (% diff 10) 1) "st") - ((= (% diff 10) 2) "nd") - ((= (% diff 10) 3) "rd") - (t "th"))))))) + (diary-ordinal-suffix diff)))))) + ;;;###diary-autoload (define-obsolete-function-alias 'diary-yahrzeit 'diary-hebrew-yahrzeit "23.1") -- 2.39.2