1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-25 07:28:20 +00:00

(generate-file-autoloads): Move misplaced paren in match clause of cond

so copying the rest of the line to the output is the else clause of if
(eolp), not after the if.
This commit is contained in:
Roland McGrath 1994-03-03 22:13:45 +00:00
parent 74cc295951
commit 52859db83c

View File

@ -206,11 +206,11 @@ are used."
outbuf))
(terpri outbuf)))
(let ((print-escape-newlines t))
(print autoload outbuf)))
(print autoload outbuf))))
;; Copy the rest of the line to the output.
(let ((begin (point)))
(forward-line 1)
(princ (buffer-substring begin (point)) outbuf)))))
(princ (buffer-substring begin (point)) outbuf))))
((looking-at ";")
;; Don't read the comment.
(forward-line 1))