Function: emacs-news--fill-paragraph

emacs-news--fill-paragraph is a byte-compiled function defined in emacs-news-mode.el.gz.

Signature

(emacs-news--fill-paragraph &optional JUSTIFY)

Source Code

;; Defined in /usr/src/emacs/lisp/textmodes/emacs-news-mode.el.gz
(defun emacs-news--fill-paragraph (&optional justify)
  (cond
   ;; We're in a heading -- do nothing.
   ((save-excursion
      (beginning-of-line)
      (looking-at "\\*+ "))
    )
   ;; We're in a news item -- exclude the heading before filling.
   ((and (save-excursion
           (re-search-backward (concat "^\\(?:" paragraph-start "\\|\\*+ \\)")
                               nil t))
         (= (char-after (match-beginning 0)) ?*))
    (save-restriction
      (narrow-to-region (save-excursion
                          (goto-char (match-beginning 0))
                          (forward-line 1)
                          (point))
                        (point-max))
      (fill-paragraph justify)))
   ;; Fill normally.
   (t
    (fill-paragraph justify))))