/[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.49.4.1 by lektu, Mon Oct 21 09:02:25 2002 UTC revision 1.49.4.2 by lektu, Mon Nov 18 07:30:56 2002 UTC
# Line 1436  Do nothing if DATE or STRING is nil." Line 1436  Do nothing if DATE or STRING is nil."
1436  If omitted, NONMARKING defaults to nil and FILE defaults to diary-file."  If omitted, NONMARKING defaults to nil and FILE defaults to diary-file."
1437    (find-file-other-window    (find-file-other-window
1438     (substitute-in-file-name (if file file diary-file)))     (substitute-in-file-name (if file file diary-file)))
1439      (widen)
1440    (goto-char (point-max))    (goto-char (point-max))
1441      (when (let ((case-fold-search t))
1442              (search-backward "Local Variables:"
1443                               (max (- (point-max) 3000) (point-min))
1444                               t))
1445        (beginning-of-line)
1446        (insert "\n")
1447        (previous-line 1))
1448    (insert    (insert
1449     (if (bolp) "" "\n")     (if (bolp) "" "\n")
1450     (if nonmarking diary-nonmarking-symbol "")     (if nonmarking diary-nonmarking-symbol "")

Legend:
Removed from v.1.49.4.1  
changed lines
  Added in v.1.49.4.2

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