/[emacs]/emacs/lisp/calendar/diary-lib.el
ViewVC logotype

Diff of /emacs/lisp/calendar/diary-lib.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.89 by gm, Tue Mar 1 10:23:58 2005 UTC revision 1.90 by gm, Wed Mar 9 00:29:14 2005 UTC
# Line 842  After the entries are marked, the hooks Line 842  After the entries are marked, the hooks
842  `mark-diary-entries-hook' are run."  `mark-diary-entries-hook' are run."
843    (interactive)    (interactive)
844    ;; To remove any deleted diary entries.    ;; To remove any deleted diary entries.
845    (when mark-diary-entries-in-calendar    (when (and mark-diary-entries-in-calendar
846                 ;; Avoid redrawing when called recursively, eg through
847                 ;; mark-diary-entries-hook for #include's, else only get
848                 ;; the last set of diary marks.
849                 (not marking-diary-entries))
850      (setq mark-diary-entries-in-calendar nil)      (setq mark-diary-entries-in-calendar nil)
851      (redraw-calendar))      (redraw-calendar))
852    (let ((marking-diary-entries t)    (let ((marking-diary-entries t)

Legend:
Removed from v.1.89  
changed lines
  Added in v.1.90

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26