Mercurial > emacs

comparison lisp/=diary-lib.el @ 4862:8f055b119428

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(list-sexp-diary-entries): Fix doc string. (hebrew-calendar-parashiot-names): Change to defvar.
author Richard M. Stallman <rms@gnu.org>
date Wed, 20 Oct 1993 05:50:35 +0000
parents 9331a313e498
children 6d93eb3d5bc7
comparison
equal deleted inserted replaced
4861:924486090b27 4862:8f055b119428
1165 the date of death on the *civil* calendar. The diary entry 1165 the date of death on the *civil* calendar. The diary entry
1166 will appear on the proper Hebrew-date anniversary and on the 1166 will appear on the proper Hebrew-date anniversary and on the
1167 day before. (If `european-calendar-style' is t, the order 1167 day before. (If `european-calendar-style' is t, the order
1168 of the parameters should be changed to DAY, MONTH, YEAR.) 1168 of the parameters should be changed to DAY, MONTH, YEAR.)
1169 1169
1170 %%(diary-sunrise-sunset)
1171 Diary entries giving the local times of Sabbath candle
1172 lighting will be made every day. Note that since there is
1173 no text, it makes sense only if the fancy diary display is
1174 used. Floating point required.
1175
1176 %%(diary-rosh-hodesh) 1170 %%(diary-rosh-hodesh)
1177 Diary entries will be made on the dates of Rosh Hodesh on 1171 Diary entries will be made on the dates of Rosh Hodesh on
1178 the Hebrew calendar. Note that since there is no text, it 1172 the Hebrew calendar. Note that since there is no text, it
1179 makes sense only if the fancy diary display is used. 1173 makes sense only if the fancy diary display is used.
1180 1174
1537 Do nothing if DATE or STRING is nil." 1531 Do nothing if DATE or STRING is nil."
1538 (and date string 1532 (and date string
1539 (setq diary-entries-list 1533 (setq diary-entries-list
1540 (append diary-entries-list (list (list date string)))))) 1534 (append diary-entries-list (list (list date string))))))
1541 1535
1542 (defconst hebrew-calendar-parashiot-names 1536 (defvar hebrew-calendar-parashiot-names
1543 ["Bereshith" "Noah" "Lech L'cha" "Vayera" "Hayei Sarah" "Toledoth" 1537 ["Bereshith" "Noah" "Lech L'cha" "Vayera" "Hayei Sarah" "Toledoth"
1544 "Vayetze" "Vayishlah" "Vayeshev" "Mikketz" "Vayiggash" "Vayhi" 1538 "Vayetze" "Vayishlah" "Vayeshev" "Mikketz" "Vayiggash" "Vayhi"
1545 "Shemoth" "Vaera" "Bo" "Beshallah" "Yithro" "Mishpatim" 1539 "Shemoth" "Vaera" "Bo" "Beshallah" "Yithro" "Mishpatim"
1546 "Terumah" "Tetzavveh" "Ki Tissa" "Vayakhel" "Pekudei" "Vayikra" 1540 "Terumah" "Tetzavveh" "Ki Tissa" "Vayakhel" "Pekudei" "Vayikra"
1547 "Tzav" "Shemini" "Tazria" "Metzora" "Aharei Moth" "Kedoshim" 1541 "Tzav" "Shemini" "Tazria" "Metzora" "Aharei Moth" "Kedoshim"