/[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.58 by lektu, Thu Oct 17 16:47:54 2002 UTC revision 1.59 by lektu, Thu Nov 14 14:09:41 2002 UTC
# Line 1457  Do nothing if DATE or STRING is nil." Line 1457  Do nothing if DATE or STRING is nil."
1457  If omitted, NONMARKING defaults to nil and FILE defaults to diary-file."  If omitted, NONMARKING defaults to nil and FILE defaults to diary-file."
1458    (find-file-other-window    (find-file-other-window
1459     (substitute-in-file-name (if file file diary-file)))     (substitute-in-file-name (if file file diary-file)))
1460      (widen)
1461    (goto-char (point-max))    (goto-char (point-max))
1462      (when (let ((case-fold-search t))
1463              (search-backward "Local Variables:"
1464                               (max (- (point-max) 3000) (point-min))
1465                               t))
1466        (beginning-of-line)
1467        (insert "\n")
1468        (previous-line 1))
1469    (insert    (insert
1470     (if (bolp) "" "\n")     (if (bolp) "" "\n")
1471     (if nonmarking diary-nonmarking-symbol "")     (if nonmarking diary-nonmarking-symbol "")

Legend:
Removed from v.1.58  
changed lines
  Added in v.1.59

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