Mercurial > emacs
comparison lisp/add-log.el @ 1062:35cc957d83d4
*** empty log message ***
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Mon, 31 Aug 1992 18:25:44 +0000 |
| parents | 5cc1bd18edf7 |
| children | 15b4ed20e524 |
comparison
equal
deleted
inserted
replaced
| 1061:06b98c795200 | 1062:35cc957d83d4 |
|---|---|
| 280 (forward-line 1) | 280 (forward-line 1) |
| 281 (backward-sexp 1) | 281 (backward-sexp 1) |
| 282 (beginning-of-line) | 282 (beginning-of-line) |
| 283 (setq tem (point)) | 283 (setq tem (point)) |
| 284 (looking-at "DEFUN\\b")) | 284 (looking-at "DEFUN\\b")) |
| 285 (>= location (point))) | 285 (>= location tem)) |
| 286 (progn | 286 (progn |
| 287 (goto-char tem) | 287 (goto-char tem) |
| 288 (down-list 1) | 288 (down-list 1) |
| 289 (if (= (char-after (point)) ?\") | 289 (if (= (char-after (point)) ?\") |
| 290 (progn | 290 (progn |