Mercurial > emacs

comparison lisp/calendar/cal-hebrew.el @ 80589:ed5ef027fc1e

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Ed Reingold <reingold at emr.cs.iit.edu> (diary-hebrew-yahrzeit): Use diary-ordinal-suffix.
author Glenn Morris <rgm@gnu.org>
date Sun, 25 May 2008 20:08:31 +0000
parents 974a828870fe
children
comparison
equal deleted inserted replaced
80588:9d42c705fd64 80589:ed5ef027fc1e
951 (cons mark 951 (cons mark
952 (format "Yahrzeit of %s%s: %d%s anniversary" 952 (format "Yahrzeit of %s%s: %d%s anniversary"
953 entry 953 entry
954 (if (= y d) "" " (evening)") 954 (if (= y d) "" " (evening)")
955 diff 955 diff
956 (cond ((= (% diff 10) 1) "st") 956 (diary-ordinal-suffix diff))))))
957 ((= (% diff 10) 2) "nd")
958 ((= (% diff 10) 3) "rd")
959 (t "th")))))))
960 957
961 (defun diary-rosh-hodesh (&optional mark) 958 (defun diary-rosh-hodesh (&optional mark)
962 "Rosh Hodesh diary entry. 959 "Rosh Hodesh diary entry.
963 Entry applies if date is Rosh Hodesh, the day before, or the Saturday before. 960 Entry applies if date is Rosh Hodesh, the day before, or the Saturday before.
964 961