diff options
| author | Jim Blandy | 1993-05-22 00:24:21 +0000 |
|---|---|---|
| committer | Jim Blandy | 1993-05-22 00:24:21 +0000 |
| commit | c8d190a5c7ef6182449bf9c01bd0603abc479c0b (patch) | |
| tree | e8409cca33decc81b4800ca664d161989dbfc7e3 | |
| parent | 39a21be6fcd80359ff5c89a5f391b03af6545ecb (diff) | |
| download | emacs-c8d190a5c7ef6182449bf9c01bd0603abc479c0b.tar.gz emacs-c8d190a5c7ef6182449bf9c01bd0603abc479c0b.zip | |
* holidays.el: Update reference to the papers in S-P&E.
(filter-visible-calendar-holidays): Test for nil date.
| -rw-r--r-- | lisp/calendar/cal-french.el | 10 | ||||
| -rw-r--r-- | lisp/calendar/cal-mayan.el | 4 | ||||
| -rw-r--r-- | lisp/calendar/holidays.el | 9 |
3 files changed, 12 insertions, 11 deletions
diff --git a/lisp/calendar/cal-french.el b/lisp/calendar/cal-french.el index 84e0de91e5b..2f9c92e9345 100644 --- a/lisp/calendar/cal-french.el +++ b/lisp/calendar/cal-french.el | |||
| @@ -28,11 +28,11 @@ | |||
| 28 | ;; This collection of functions implements the features of calendar.el and | 28 | ;; This collection of functions implements the features of calendar.el and |
| 29 | ;; diary.el that deal with the French Revolutionary calendar. | 29 | ;; diary.el that deal with the French Revolutionary calendar. |
| 30 | 30 | ||
| 31 | ;; Technical details of the French Revolutionary calendrical calculations can | 31 | ;; Technical details of the Mayan calendrical calculations can be found in |
| 32 | ;; be found in ``Calendrical Calculations, Part II: Three Historical | 32 | ;; ``Calendrical Calculations, Part II: Three Historical Calendars'' |
| 33 | ;; Calendars'' by E. M. Reingold, N. Dershowitz, and S. M. Clamen, | 33 | ;; by E. M. Reingold, N. Dershowitz, and S. M. Clamen, |
| 34 | ;; Report Number UIUCDCS-R-92-1743, Department of Computer Science, | 34 | ;; Software--Practice and Experience, Volume 23, Number 4 (April, 1993), |
| 35 | ;; University of Illinois, April, 1992. | 35 | ;; pages 383-404. |
| 36 | 36 | ||
| 37 | ;; Comments, corrections, and improvements should be sent to | 37 | ;; Comments, corrections, and improvements should be sent to |
| 38 | ;; Edward M. Reingold Department of Computer Science | 38 | ;; Edward M. Reingold Department of Computer Science |
diff --git a/lisp/calendar/cal-mayan.el b/lisp/calendar/cal-mayan.el index f0d5b7981f3..9d88e4e60fa 100644 --- a/lisp/calendar/cal-mayan.el +++ b/lisp/calendar/cal-mayan.el | |||
| @@ -46,8 +46,8 @@ | |||
| 46 | ;; Technical details of the Mayan calendrical calculations can be found in | 46 | ;; Technical details of the Mayan calendrical calculations can be found in |
| 47 | ;; ``Calendrical Calculations, Part II: Three Historical Calendars'' | 47 | ;; ``Calendrical Calculations, Part II: Three Historical Calendars'' |
| 48 | ;; by E. M. Reingold, N. Dershowitz, and S. M. Clamen, | 48 | ;; by E. M. Reingold, N. Dershowitz, and S. M. Clamen, |
| 49 | ;; Report Number UIUCDCS-R-92-1743, Department of Computer Science, | 49 | ;; Software--Practice and Experience, Volume 23, Number 4 (April, 1993), |
| 50 | ;; University of Illinois, April, 1992. | 50 | ;; pages 383-404. |
| 51 | 51 | ||
| 52 | ;;; Code: | 52 | ;;; Code: |
| 53 | 53 | ||
diff --git a/lisp/calendar/holidays.el b/lisp/calendar/holidays.el index 5dd4a537cf1..00d96531a64 100644 --- a/lisp/calendar/holidays.el +++ b/lisp/calendar/holidays.el | |||
| @@ -38,8 +38,8 @@ | |||
| 38 | ;; Software--Practice and Experience, Volume 20, Number 9 (September, 1990), | 38 | ;; Software--Practice and Experience, Volume 20, Number 9 (September, 1990), |
| 39 | ;; pages 899-928. ``Calendrical Calculations, Part II: Three Historical | 39 | ;; pages 899-928. ``Calendrical Calculations, Part II: Three Historical |
| 40 | ;; Calendars'' by E. M. Reingold, N. Dershowitz, and S. M. Clamen, | 40 | ;; Calendars'' by E. M. Reingold, N. Dershowitz, and S. M. Clamen, |
| 41 | ;; Report Number UIUCDCS-R-92-1743, Department of Computer Science, | 41 | ;; Software--Practice and Experience, Volume 23, Number 4 (April, 1993), |
| 42 | ;; University of Illinois, April, 1992. | 42 | ;; pages 383-404. |
| 43 | 43 | ||
| 44 | ;; Hard copies of these two papers can be obtained by sending email to | 44 | ;; Hard copies of these two papers can be obtained by sending email to |
| 45 | ;; reingold@cs.uiuc.edu with the SUBJECT "send-paper-cal" (no quotes) and | 45 | ;; reingold@cs.uiuc.edu with the SUBJECT "send-paper-cal" (no quotes) and |
| @@ -662,8 +662,9 @@ in the calendar window." | |||
| 662 | (let ((visible) | 662 | (let ((visible) |
| 663 | (p l)) | 663 | (p l)) |
| 664 | (while p | 664 | (while p |
| 665 | (if (calendar-date-is-visible-p (car (car p))) | 665 | (and (car (car p)) |
| 666 | (setq visible (append (list (car p)) visible))) | 666 | (calendar-date-is-visible-p (car (car p))) |
| 667 | (setq visible (append (list (car p)) visible))) | ||
| 667 | (setq p (cdr p))) | 668 | (setq p (cdr p))) |
| 668 | visible)) | 669 | visible)) |
| 669 | 670 | ||