diff options
| author | Roland McGrath | 1994-03-03 22:13:45 +0000 |
|---|---|---|
| committer | Roland McGrath | 1994-03-03 22:13:45 +0000 |
| commit | 52859db83c36cbcb200fe98e41ddaaaa9658b8fd (patch) | |
| tree | ce4fabc475ddf6d95a7d94f0cab242ffa1e554b2 | |
| parent | 74cc295951e81ce474d4c13f4fe99305e27e20de (diff) | |
| download | emacs-52859db83c36cbcb200fe98e41ddaaaa9658b8fd.tar.gz emacs-52859db83c36cbcb200fe98e41ddaaaa9658b8fd.zip | |
(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.
| -rw-r--r-- | lisp/emacs-lisp/autoload.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/emacs-lisp/autoload.el b/lisp/emacs-lisp/autoload.el index d54837374d4..22d06cc20f0 100644 --- a/lisp/emacs-lisp/autoload.el +++ b/lisp/emacs-lisp/autoload.el | |||
| @@ -206,11 +206,11 @@ are used." | |||
| 206 | outbuf)) | 206 | outbuf)) |
| 207 | (terpri outbuf))) | 207 | (terpri outbuf))) |
| 208 | (let ((print-escape-newlines t)) | 208 | (let ((print-escape-newlines t)) |
| 209 | (print autoload outbuf))) | 209 | (print autoload outbuf)))) |
| 210 | ;; Copy the rest of the line to the output. | 210 | ;; Copy the rest of the line to the output. |
| 211 | (let ((begin (point))) | 211 | (let ((begin (point))) |
| 212 | (forward-line 1) | 212 | (forward-line 1) |
| 213 | (princ (buffer-substring begin (point)) outbuf))))) | 213 | (princ (buffer-substring begin (point)) outbuf)))) |
| 214 | ((looking-at ";") | 214 | ((looking-at ";") |
| 215 | ;; Don't read the comment. | 215 | ;; Don't read the comment. |
| 216 | (forward-line 1)) | 216 | (forward-line 1)) |