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

(cvs-update-header): Fix handling of extra newlines so that

Browse Source 
they don't keep accumulating.
This commit is contained in:
Stefan Monnier 2006-10-02 00:21:07 +00:00
parent b635746323
commit 04e408d9e2
2 changed files with 19 additions and 13 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

20
lisp/ChangeLog
View File

@ -1,8 +1,12 @@
2006-10-01 Stefan Monnier <monnier@iro.umontreal.ca>
* pcvs.el (cvs-update-header): Fix handling of extra newlines so that
they don't keep accumulating.
2006-10-01 Bob Rogers <rogers-emacs@rgrjr.dyndns.org> (tiny change)
* ffap.el (ffap-rfc-path): Change the address of the RFC
repository to ftp.rfc-editor.org, as ds.internic.net seems to be
gone.
repository to ftp.rfc-editor.org, as ds.internic.net seems to be gone.
2006-10-01 Stephen Berman <Stephen.Berman@gmx.net>
@ -38,7 +42,7 @@
2006-09-30 Martin Rudalics <rudalics@gmx.at>
* files.el (find-file-existing): Modified to not allow wildcards.
* files.el (find-file-existing): Modify to not allow wildcards.
2006-09-30 Johan Bockg,Ae(Brd <bojohan@dd.chalmers.se>
@ -47,15 +51,15 @@
2006-09-30 Michael Welsh Duggan <md5i@cs.cmu.edu>
* progmodes/sh-script.el (sh-prev-thing): Take
`sh-leading-keywords' into account.
* progmodes/sh-script.el (sh-prev-thing):
Take `sh-leading-keywords' into account.
2006-09-29 Glenn Morris <rgm@gnu.org>
* custom.el (defcustom): Doc fix.
* calendar/calendar.el (european-calendar-style): Call
european-calendar or american-calendar as needed when set.
* calendar/calendar.el (european-calendar-style):
Call european-calendar or american-calendar as needed when set.
(diary-view-entries, list-calendar-holidays): Move autoloads
before use.
@ -82,7 +86,7 @@
2006-09-29 Carsten Dominik <dominik@science.uva.nl>
* textmodes/org.el (org-file-remote-p): Get regexp from list.
(org-archive-subtree): remove erraneous `]' from character list.
(org-archive-subtree): Remove erraneous `]' from character list.
2006-09-28 Jonathan Yavner <jyavner@member.fsf.org>

12
lisp/pcvs.el
View File

@ -618,7 +618,6 @@ If non-nil, NEW means to create a new buffer no matter what."
(str (car hf))
(done "")
(tin (ewoc-nth cvs-cookies 0)))
(if (eq (length str) 2) (setq str ""))
;; look for the first *real* fileinfo (to determine emptyness)
(while
(and tin
@ -626,14 +625,17 @@ If non-nil, NEW means to create a new buffer no matter what."
'(MESSAGE DIRCHANGE)))
(setq tin (ewoc-next cvs-cookies tin)))
(if add
(setq str (concat "-- Running " cmd " ...\n" str))
(progn
;; Remove the default empty line, if applicable.
(if (not (string-match "." str)) (setq str "\n"))
(setq str (concat "-- Running " cmd " ...\n" str)))
(if (not (string-match
(concat "^-- Running " (regexp-quote cmd) " \\.\\.\\.\n") str))
(error "Internal PCL-CVS error while removing message")
(setq str (replace-match "" t t str))
(if (zerop (length str)) (setq str "\n"))
(setq done (concat "-- last cmd: " cmd " --"))))
(setq str (concat str "\n") done (concat done "\n"))
;; Re-add the default empty line, if applicable.
(if (not (string-match "." str)) (setq str "\n\n"))
(setq done (concat "-- last cmd: " cmd " --\n"))))
;; set the new header and footer
(ewoc-set-hf cvs-cookies
str (concat "\n--------------------- "