mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00
Code Issues Projects Releases Wiki Activity

Prefer \... to control chars in .el literals

Browse source
This commit is contained in:
Paul Eggert 2018-03-29 17:41:11 -07:00
parent 00c1f771f2
commit 20b858ef13
12 changed files with 408 additions and 408 deletions
Download patch file Download diff file Expand all files Collapse all files

2
lisp/vc/pcvs.el
View file

@ -700,7 +700,7 @@ OLD-FIS is the list of fileinfos on which the cvs command was applied and
;; because of the call to `process-send-eof'.
(save-excursion
(goto-char (point-min))
(while (re-search-forward "^\\^D+" nil t)
(while (re-search-forward "^\\^D\^H+" nil t)
(let ((inhibit-read-only t))
(delete-region (match-beginning 0) (match-end 0))))))
(let* ((fileinfos (cvs-parse-buffer 'cvs-parse-table dcd subdir))