diff options
| author | Glenn Morris | 2008-03-13 06:00:07 +0000 |
|---|---|---|
| committer | Glenn Morris | 2008-03-13 06:00:07 +0000 |
| commit | 8ccd0d4dbc3fedb2bdabb37bd25d1dcd5e38b559 (patch) | |
| tree | 04ecaff94f903ad253fe62daf8fe0fb5d19a1a59 | |
| parent | a53b53b3dfedc538f82e3f9da9516fbc04c7ebda (diff) | |
| download | emacs-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/ChangeLog | 22 | ||||
| -rw-r--r-- | lisp/calendar/calendar.el | 111 |
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. |
| 646 | If nil (the default), `simple-diary-display' is used. Use `ignore' for no | 642 | If 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. | ||
| 1340 | Searches your diary file for entries that match ARG days starting with | ||
| 1341 | the date indicated by the cursor position in the displayed three-month | ||
| 1342 | calendar." | ||
| 1343 | t) | ||
| 1344 | |||
| 1345 | (autoload 'calendar-list-holidays "holidays" | ||
| 1346 | "Create a buffer containing the holidays for the current calendar window. | ||
| 1347 | The holidays are those in the list `calendar-notable-days'. Returns t if any | ||
| 1348 | holidays 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. |
| 1353 | The three months appear side by side, with the current month in the middle | 1336 | The 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. | ||
| 1422 | Searches for entries that match ARG days, starting with the date indicated | ||
| 1423 | by the cursor position in the displayed three-month calendar. | ||
| 1424 | D-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. | ||
| 1448 | This function gets rid of the selective display of the diary file so that | ||
| 1449 | all entries, not just some, are visible. If there is no diary buffer, one | ||
| 1450 | is created." | ||
| 1451 | t) | ||
| 1452 | |||
| 1453 | (autoload 'mark-diary-entries "diary-lib" | ||
| 1454 | "Mark days in the calendar window that have diary entries. | ||
| 1455 | Each 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 | ||
| 1491 | indicated 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 | ||
| 1496 | to 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 | ||
| 1501 | to 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. |
| 1514 | Or, for optional MON, YR." | 1405 | Or, 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)) |