so copying the rest of the line to the output is the else clause of if
(eolp), not after the if.
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))