2286 |
"Regexp matching a character where no interword space is necessary. |
"Regexp matching a character where no interword space is necessary. |
2287 |
Words formed by such characters can be broken across newlines.") |
Words formed by such characters can be broken across newlines.") |
2288 |
|
|
2289 |
|
(defvar LaTeX-fill-newline-hook nil |
2290 |
|
"Hook run after `LaTeX-fill-newline' inserted and indented a new line.") |
2291 |
|
|
2292 |
(defun LaTeX-fill-region-as-paragraph (from to &optional justify-flag) |
(defun LaTeX-fill-region-as-paragraph (from to &optional justify-flag) |
2293 |
"Fill region as one paragraph. |
"Fill region as one paragraph. |
2294 |
Break lines to fit `fill-column', but leave all lines ending with |
Break lines to fit `fill-column', but leave all lines ending with |
2848 |
;; Markers that were after the whitespace are now at point: insert |
;; Markers that were after the whitespace are now at point: insert |
2849 |
;; before them so they don't get stuck before the prefix. |
;; before them so they don't get stuck before the prefix. |
2850 |
(insert-before-markers-and-inherit fill-prefix)) |
(insert-before-markers-and-inherit fill-prefix)) |
2851 |
(indent-according-to-mode)) |
(indent-according-to-mode) |
2852 |
|
(run-hooks 'LaTeX-fill-newline-hook)) |
2853 |
|
|
2854 |
(defun LaTeX-fill-paragraph (&optional justify) |
(defun LaTeX-fill-paragraph (&optional justify) |
2855 |
"Like \\[fill-paragraph], but handle LaTeX comments. |
"Like \\[fill-paragraph], but handle LaTeX comments. |