Commit 76ffef2b authored by Per Cederqvist's avatar Per Cederqvist
Browse files

(lyskom-minimum-triangle-size): This was formerly named

	lyskom-minimum-triagle-size, with a spelling error in the "triangle".
(lyskom-fill-message): Updated for the above change.
parent 6d231cb4
2002-09-22 Per Cederqvist <ceder@ceder.dyndns.org>
* lyskom-rest.el (lyskom-minimum-triangle-size): This was formerly
named lyskom-minimum-triagle-size, with a spelling error in the
"triangle".
(lyskom-fill-message): Updated for the above change.
2002-09-19 David Byers <davby@metzengerstein.dyndns.org> 2002-09-19 David Byers <davby@metzengerstein.dyndns.org>
* Release of 0.47.1-BETA-2 * Release of 0.47.1-BETA-2
......
...@@ -2175,7 +2175,7 @@ in lyskom-messages." ...@@ -2175,7 +2175,7 @@ in lyskom-messages."
;;; constant. ;;; constant.
;;; ;;;
(defconst lyskom-minimum-triagle-size 3 (defconst lyskom-minimum-triangle-size 3
"Minimum number of lines in a triangle or suchlike.") "Minimum number of lines in a triangle or suchlike.")
(defconst lyskom-minimum-brick-size 2 (defconst lyskom-minimum-brick-size 2
...@@ -2281,7 +2281,7 @@ in lyskom-messages." ...@@ -2281,7 +2281,7 @@ in lyskom-messages."
(and (eq 0 length-difference) (and (eq 0 length-difference)
(< paragraph-length lyskom-minimum-brick-size)) (< paragraph-length lyskom-minimum-brick-size))
(and (not (eq 0 length-difference)) (and (not (eq 0 length-difference))
(< paragraph-length lyskom-minimum-triagle-size)))) (< paragraph-length lyskom-minimum-triangle-size))))
(lyskom-fill-region start (1- (match-beginning 0)) nil t) (lyskom-fill-region start (1- (match-beginning 0)) nil t)
(lyskom-signal-reformatted-text 'reformat-filled)) (lyskom-signal-reformatted-text 'reformat-filled))
(setq start (match-end 0) (setq start (match-end 0)
...@@ -2314,7 +2314,7 @@ in lyskom-messages." ...@@ -2314,7 +2314,7 @@ in lyskom-messages."
(or (and (eq 0 length-difference) (or (and (eq 0 length-difference)
(< paragraph-length lyskom-minimum-brick-size)) (< paragraph-length lyskom-minimum-brick-size))
(and (not (eq 0 length-difference)) (and (not (eq 0 length-difference))
(< paragraph-length lyskom-minimum-triagle-size)) (< paragraph-length lyskom-minimum-triangle-size))
(null constant-length))) (null constant-length)))
(lyskom-fill-region start (match-beginning 0) nil t) (lyskom-fill-region start (match-beginning 0) nil t)
(lyskom-signal-reformatted-text 'reformat-filled)) (lyskom-signal-reformatted-text 'reformat-filled))
...@@ -2338,7 +2338,7 @@ in lyskom-messages." ...@@ -2338,7 +2338,7 @@ in lyskom-messages."
(or (and (eq 0 length-difference) (or (and (eq 0 length-difference)
(< paragraph-length lyskom-minimum-brick-size)) (< paragraph-length lyskom-minimum-brick-size))
(and (not (eq 0 length-difference)) (and (not (eq 0 length-difference))
(< paragraph-length lyskom-minimum-triagle-size)) (< paragraph-length lyskom-minimum-triangle-size))
(null constant-length))) (null constant-length)))
(lyskom-fill-region start (match-beginning 0) nil t) (lyskom-fill-region start (match-beginning 0) nil t)
(lyskom-signal-reformatted-text 'reformat-filled)) (lyskom-signal-reformatted-text 'reformat-filled))
...@@ -2476,7 +2476,7 @@ in lyskom-messages." ...@@ -2476,7 +2476,7 @@ in lyskom-messages."
(or (and (eq 0 length-difference) (or (and (eq 0 length-difference)
(< paragraph-length lyskom-minimum-brick-size)) (< paragraph-length lyskom-minimum-brick-size))
(and (not (eq 0 length-difference)) (and (not (eq 0 length-difference))
(< paragraph-length lyskom-minimum-triagle-size)) (< paragraph-length lyskom-minimum-triangle-size))
(not (eq constant-length t)))) (not (eq constant-length t))))
(lyskom-fill-region start (point) nil t) (lyskom-fill-region start (point) nil t)
(lyskom-signal-reformatted-text 'reformat-filled))) (lyskom-signal-reformatted-text 'reformat-filled)))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment