Mercurial > emacs

comparison lisp/textmodes/fill.el @ 23351:a8979439d44b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(fill-individual-paragraphs-prefix): Avoid nil value of `two-lines-citation-part'
author Karl Heuer <kwzh@gnu.org>
date Wed, 30 Sep 1998 19:03:31 +0000
parents 973ac8db2f92
children dc320f6914fe
comparison
equal deleted inserted replaced
23350:df3df03d8a19 23351:a8979439d44b
1085 (setq two-lines-citation-part 1085 (setq two-lines-citation-part
1086 (if citation-regexp 1086 (if citation-regexp
1087 (fill-individual-paragraphs-citation two-lines-prefix 1087 (fill-individual-paragraphs-citation two-lines-prefix
1088 citation-regexp) 1088 citation-regexp)
1089 just-one-line-prefix)) 1089 just-one-line-prefix))
1090 (or two-lines-citation-part (setq two-lines-citation-part ""))
1090 (setq adjusted-two-lines-citation-part 1091 (setq adjusted-two-lines-citation-part
1091 (substring two-lines-citation-part 0 1092 (substring two-lines-citation-part 0
1092 (string-match "[ \t]*\\'" 1093 (string-match "[ \t]*\\'"
1093 two-lines-citation-part)))) 1094 two-lines-citation-part))))
1094 ;; See if the citation part of JUST-ONE-LINE-PREFIX 1095 ;; See if the citation part of JUST-ONE-LINE-PREFIX