procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(tsang-quick-converter): Fix broken line-ends from CVS before doing conversion.

Browse source
This commit is contained in:
Jason Rumney 2003-09-02 22:20:29 +00:00
parent a2fcf0296f
commit 6ed24d2e35
2 changed files with 10 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
lisp/ChangeLog
View file

@ -1,3 +1,8 @@
2003-09-02 Jason Rumney <jasonr@gnu.org>
* international/titdic-cnv.el (tsang-quick-converter): Fix broken
line-ends from CVS before doing conversion.
2003-09-02 Glenn Morris <gmorris@ast.cam.ac.uk>
* calendar/diary-lib.el (diary-header-line-flag)

5
lisp/international/titdic-cnv.el
View file

@ -768,6 +768,11 @@ To get complete usage, invoke \"emacs -batch -f batch-titdic-convert -h\"."
(insert "(quail-define-rules\n")
(save-excursion
(set-buffer dicbuf)
;; Handle double CR line ends, which result when checking out of
;; CVS on MS-Windows.
(goto-char (point-min))
(while (re-search-forward "\r\r$" nil t)
(replace-match ""))
(goto-char (point-min))
(search-forward "A440")
(beginning-of-line)