mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-22 18:35:09 +00:00
Code Issues Releases Activity

(list-diary-entries): Use insert instead of insert-string.

Browse Source
This commit is contained in:
Pavel Janík 2001-11-26 16:19:34 +00:00
parent 0e13751e8a
commit 4cf95c440b
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lisp/calendar/diary-lib.el
View File

@ -261,10 +261,10 @@ These hooks have the following distinct roles:
(if (not (looking-at "\^M\\|\n"))
(progn
(goto-char (point-max))
(insert-string "\^M")))
(insert "\^M")))
(goto-char (point-min))
(if (not (looking-at "\^M\\|\n"))
(insert-string "\^M"))
(insert "\^M"))
(subst-char-in-region (point-min) (point-max) ?\n ?\^M t)
(calendar-for-loop i from 1 to number do
(let ((d diary-date-forms)