diff options
| author | Richard M. Stallman <[email protected]> | 1995-01-19 04:29:17 +0000 |
|---|---|---|
| committer | Richard M. Stallman <[email protected]> | 1995-01-19 04:29:17 +0000 |
| commit | 9a04e20535e309d1d4b1fe31fddc772e58ec6501 (patch) | |
| tree | 9b35c807098a490a0b79051a1e01bbefff274c9b /lisp | |
| parent | f43726fd674dcaa099bc7155e518338958f6bace (diff) | |
(fill-region-as-paragraph): left-margin renamed to current-left-margin.
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/textmodes/fill.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/textmodes/fill.el b/lisp/textmodes/fill.el index 16153803d8..535323e9f1 100644 --- a/lisp/textmodes/fill.el +++ b/lisp/textmodes/fill.el @@ -161,7 +161,7 @@ space does not end a sentence, so don't break a line there." (setq to (max from to)) (while (< (point) to) (if (not (eolp)) - (if (< (current-indentation) (left-margin)) + (if (< (current-indentation) (current-left-margin)) (indent-to-left-margin))) (forward-line 1))) @@ -181,7 +181,7 @@ space does not end a sentence, so don't break a line there." (remove-text-properties from to '(hard nil))) ;; Make sure first line is indented (at least) to left margin... (if (or (memq justify '(right center)) - (< (current-indentation) (left-margin))) + (< (current-indentation) (current-left-margin))) (indent-to-left-margin)) ;; and remove indentation from other lines. (beginning-of-line 2) @@ -194,7 +194,7 @@ space does not end a sentence, so don't break a line there." (regexp-quote fill-prefix))))) (and fpre (progn - (if (>= (+ (left-margin) (length fill-prefix)) + (if (>= (+ (current-left-margin) (length fill-prefix)) (current-fill-column)) (error "fill-prefix too long for specified width")) (goto-char from) |