aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorGlenn Morris2008-03-13 06:00:07 +0000
committerGlenn Morris2008-03-13 06:00:07 +0000
commit8ccd0d4dbc3fedb2bdabb37bd25d1dcd5e38b559 (patch)
tree04ecaff94f903ad253fe62daf8fe0fb5d19a1a59
parenta53b53b3dfedc538f82e3f9da9516fbc04c7ebda (diff)
downloademacs-8ccd0d4dbc3fedb2bdabb37bd25d1dcd5e38b559.tar.gz
emacs-8ccd0d4dbc3fedb2bdabb37bd25d1dcd5e38b559.zip
Remove explicit autoloads now in cal-loaddefs.
(generate-calendar-window): Use calendar-mark-holidays rather than obsolete alias.
-rw-r--r--lisp/ChangeLog22
-rw-r--r--lisp/calendar/calendar.el111
2 files changed, 23 insertions, 110 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 707f5fda313..e017a0dc99f 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -5,8 +5,24 @@
5 5
6 * startup.el (command-line-1): Rename -scriptload to -internal-script. 6 * startup.el (command-line-1): Rename -scriptload to -internal-script.
7 7
8 * calendar/cal-bahai.el, calendar/cal-china.el, calendar/cal-coptic.el:
9 * calendar/cal-french.el, calendar/cal-hebrew.el, calendar/cal-html.el:
10 * calendar/cal-islam.el, calendar/cal-iso.el, calendar/cal-julian.el:
11 * calendar/cal-mayan.el, calendar/cal-move.el, calendar/cal-persia.el:
12 * calendar/cal-tex.el, calendar/cal-x.el, calendar/diary-lib.el:
13 * calendar/holidays.el, calendar/lunar.el, calendar/solar.el:
14 Add calendar-specific autoload cookies, and remove any setting of
15 generated-autoload-file.
16 * calendar/calendar.el: Remove explicit autoloads now in cal-loaddefs.
17 * calendar/diary-lib.el: Replace explicit autoloads with reading of
18 diary-loaddefs.
19 * calendar/holidays.el: Replace explicit autoloads with reading of
20 hol-loaddefs.
21
8 * calendar/calendar.el (cal-hebrew-yahrzeit-buffer): New constant. 22 * calendar/calendar.el (cal-hebrew-yahrzeit-buffer): New constant.
9 (calendar-buffer-list): Simplify. 23 (calendar-buffer-list): Simplify.
24 (generate-calendar-window): Use calendar-mark-holidays rather than
25 obsolete alias.
10 26
11 * calendar/cal-hebrew.el (list-yahrzeit-dates): Use 27 * calendar/cal-hebrew.el (list-yahrzeit-dates): Use
12 cal-hebrew-yahrzeit-buffer. 28 cal-hebrew-yahrzeit-buffer.
@@ -18,6 +34,10 @@
18 * calendar/appt.el (appt-mode-string): Mark as risky. 34 * calendar/appt.el (appt-mode-string): Mark as risky.
19 (appt-check): Apply mode-line-emphasis face to appt-mode-string. 35 (appt-check): Apply mode-line-emphasis face to appt-mode-string.
20 36
37 * calendar/cal-html.el (diary-list-entries):
38 * calendar/cal-tex.el (calendar-holiday-list, diary-list-entries)
39 (calendar-iso-from-absolute): Fix autoloads.
40
21 * calendar/cal-iso.el (calendar-absolute-from-iso) 41 * calendar/cal-iso.el (calendar-absolute-from-iso)
22 (calendar-iso-read-args): Simplify. 42 (calendar-iso-read-args): Simplify.
23 (calendar-iso-date-string, calendar-iso-read-args) 43 (calendar-iso-date-string, calendar-iso-read-args)
@@ -31,6 +51,8 @@
31 (persian-calendar-epoch, calendar-persian-date-string): Doc fixes. 51 (persian-calendar-epoch, calendar-persian-date-string): Doc fixes.
32 (persian-prompt-for-date): Remove local variable `today'. 52 (persian-prompt-for-date): Remove local variable `today'.
33 53
54 * calendar/diary-lib.el (mark-calendar-month): Use zerop.
55
34 * calendar/solar.el (solar-moment, solar-exact-local-noon) 56 * calendar/solar.el (solar-moment, solar-exact-local-noon)
35 (solar-sunrise-sunset, solar-sunrise-sunset-string) 57 (solar-sunrise-sunset, solar-sunrise-sunset-string)
36 (solar-ephemeris-time, solar-date-next-longitude, solar-sidereal-time): 58 (solar-ephemeris-time, solar-date-next-longitude, solar-sidereal-time):
diff --git a/lisp/calendar/calendar.el b/lisp/calendar/calendar.el
index 733772c4acc..0aa97e4fa78 100644
--- a/lisp/calendar/calendar.el
+++ b/lisp/calendar/calendar.el
@@ -523,8 +523,6 @@ See the documentation of `diary-date-forms' for an explanation."
523 (choice symbol regexp))))) 523 (choice symbol regexp)))))
524 :group 'diary) 524 :group 'diary)
525 525
526(autoload 'diary-font-lock-keywords "diary-lib")
527(autoload 'diary-live-p "diary-lib")
528(defvar diary-font-lock-keywords) 526(defvar diary-font-lock-keywords)
529 527
530(defcustom diary-date-forms 528(defcustom diary-date-forms
@@ -639,8 +637,6 @@ Can be used for appointment notification."
639 :type 'hook 637 :type 'hook
640 :group 'diary) 638 :group 'diary)
641 639
642(autoload 'diary-set-maybe-redraw "diary-lib")
643
644(defcustom diary-display-hook nil 640(defcustom diary-display-hook nil
645 "List of functions that handle the display of the diary. 641 "List of functions that handle the display of the diary.
646If nil (the default), `simple-diary-display' is used. Use `ignore' for no 642If nil (the default), `simple-diary-display' is used. Use `ignore' for no
@@ -1335,19 +1331,6 @@ See the documentation of that function for more information."
1335 (calendar-only-one-frame-setup arg)) 1331 (calendar-only-one-frame-setup arg))
1336 (t (calendar-basic-setup arg)))) 1332 (t (calendar-basic-setup arg))))
1337 1333
1338(autoload 'diary-view-entries "diary-lib"
1339 "Prepare and display a buffer with diary entries.
1340Searches your diary file for entries that match ARG days starting with
1341the date indicated by the cursor position in the displayed three-month
1342calendar."
1343 t)
1344
1345(autoload 'calendar-list-holidays "holidays"
1346 "Create a buffer containing the holidays for the current calendar window.
1347The holidays are those in the list `calendar-notable-days'. Returns t if any
1348holidays are found, nil if not."
1349 t)
1350
1351(defun calendar-basic-setup (&optional arg) 1334(defun calendar-basic-setup (&optional arg)
1352 "Display a three-month calendar in another window. 1335 "Display a three-month calendar in another window.
1353The three months appear side by side, with the current month in the middle 1336The three months appear side by side, with the current month in the middle
@@ -1417,98 +1400,6 @@ to be replaced by asterisks to highlight it whenever it is in the window."
1417 (calendar-list-holidays))) 1400 (calendar-list-holidays)))
1418 (run-hooks 'initial-calendar-window-hook)) 1401 (run-hooks 'initial-calendar-window-hook))
1419 1402
1420(autoload 'view-other-diary-entries "diary-lib"
1421 "Prepare and display buffer of diary entries from an alternative diary file.
1422Searches for entries that match ARG days, starting with the date indicated
1423by the cursor position in the displayed three-month calendar.
1424D-FILE specifies the file to use as the diary file."
1425 t)
1426
1427(autoload 'calendar-sunrise-sunset "solar"
1428 "Local time of sunrise and sunset for date under cursor."
1429 t)
1430
1431(autoload 'calendar-phases-of-moon "lunar"
1432 "Create a buffer of the phases of the moon for the current calendar window."
1433 t)
1434
1435(autoload 'calendar-goto-hebrew-date "cal-hebrew"
1436 "Move cursor to Hebrew date."
1437 t)
1438
1439(autoload 'calendar-print-hebrew-date "cal-hebrew"
1440 "Show the Hebrew date equivalents of date."
1441 t)
1442
1443(autoload 'calendar-hebrew-date-string "cal-hebrew"
1444 "String of Hebrew date of Gregorian date.")
1445
1446(autoload 'diary-show-all-entries "diary-lib"
1447 "Show all of the diary entries in the diary file.
1448This function gets rid of the selective display of the diary file so that
1449all entries, not just some, are visible. If there is no diary buffer, one
1450is created."
1451 t)
1452
1453(autoload 'mark-diary-entries "diary-lib"
1454 "Mark days in the calendar window that have diary entries.
1455Each entry in diary file visible in the calendar window is marked."
1456 t)
1457
1458(autoload 'make-diary-entry "diary-lib"
1459 "Insert a diary entry STRING which may be NONMARKING in FILE.")
1460
1461(autoload 'insert-diary-entry "diary-lib"
1462 "Insert a diary entry for the date indicated by point."
1463 t)
1464
1465(autoload 'insert-weekly-diary-entry "diary-lib"
1466 "Insert a weekly diary entry for the day of the week indicated by point."
1467 t)
1468
1469(autoload 'insert-monthly-diary-entry "diary-lib"
1470 "Insert a monthly diary entry for the day of the month indicated by point."
1471 t)
1472
1473(autoload 'insert-yearly-diary-entry "diary-lib"
1474 "Insert an annual diary entry for the day of the year indicated by point."
1475 t)
1476
1477(autoload 'insert-anniversary-diary-entry "diary-lib"
1478 "Insert an anniversary diary entry for the date indicated by point."
1479 t)
1480
1481(autoload 'insert-block-diary-entry "diary-lib"
1482 "Insert a block diary entry for the dates indicated by point and mark."
1483 t)
1484
1485(autoload 'insert-cyclic-diary-entry "diary-lib"
1486 "Insert a cyclic diary entry starting at the date indicated by point."
1487 t)
1488
1489(autoload 'insert-hebrew-diary-entry "cal-hebrew"
1490 "Insert a diary entry for the Hebrew date corresponding to the date
1491indicated by point."
1492 t)
1493
1494(autoload 'insert-monthly-hebrew-diary-entry "cal-hebrew"
1495 "Insert a monthly diary entry for the day of the Hebrew month corresponding
1496to the date indicated by point."
1497 t)
1498
1499(autoload 'insert-yearly-hebrew-diary-entry "cal-hebrew"
1500 "Insert an annual diary entry for the day of the Hebrew year corresponding
1501to the date indicated by point."
1502 t)
1503
1504(autoload 'mark-calendar-holidays "holidays"
1505 "Mark notable days in the calendar window."
1506 t)
1507
1508(autoload 'calendar-cursor-holidays "holidays"
1509 "Find holidays for the date specified by the cursor in the calendar window."
1510 t)
1511
1512(defun generate-calendar-window (&optional mon yr) 1403(defun generate-calendar-window (&optional mon yr)
1513 "Generate the calendar window for the current date. 1404 "Generate the calendar window for the current date.
1514Or, for optional MON, YR." 1405Or, for optional MON, YR."
@@ -1544,7 +1435,7 @@ Or, for optional MON, YR."
1544 (font-lock-fontify-buffer)) 1435 (font-lock-fontify-buffer))
1545 (and mark-holidays-in-calendar 1436 (and mark-holidays-in-calendar
1546;;; (calendar-date-is-valid-p today) ; useful for BC dates 1437;;; (calendar-date-is-valid-p today) ; useful for BC dates
1547 (mark-calendar-holidays) 1438 (calendar-mark-holidays)
1548 (and in-calendar-window (sit-for 0))) 1439 (and in-calendar-window (sit-for 0)))
1549 (unwind-protect 1440 (unwind-protect
1550 (if mark-diary-entries-in-calendar (mark-diary-entries)) 1441 (if mark-diary-entries-in-calendar (mark-diary-entries))