diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2001-11-03 00:55:10 +0000 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2001-11-03 00:55:10 +0000 |
| commit | 6d1f0a5ea92a494b45adfde8db97bbb914f14a17 (patch) | |
| tree | 8d817b031014f18aaac4f72656fd097219c781ef | |
| parent | 24790d0c3e005ec41733e53f7bb15e985e3b74d5 (diff) | |
| download | emacs-6d1f0a5ea92a494b45adfde8db97bbb914f14a17.tar.gz | |
(fill-context-prefix): Fix braino.
| -rw-r--r-- | lisp/textmodes/fill.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/textmodes/fill.el b/lisp/textmodes/fill.el index afe493b5591..dedceb730b6 100644 --- a/lisp/textmodes/fill.el +++ b/lisp/textmodes/fill.el @@ -200,12 +200,12 @@ act as a paragraph-separator." (goto-char from) (if (eolp) (forward-line 1)) ;; Move to the second line unless there is just one. + (move-to-left-margin) (let ((firstline (point)) first-line-prefix ;; Non-nil if we are on the second line. second-line-prefix start) - (move-to-left-margin) (setq start (point)) (setq first-line-prefix ;; We don't need to consider `paragraph-start' here since it @@ -238,7 +238,7 @@ act as a paragraph-separator." ;; Used when first line is `/* ...' and second-line is ;; ` * ...'. (save-excursion - (goto-char start) + (goto-char firstline) (looking-at (apply 'concat (mapcar (lambda (c) |