(c-basic-common-init): Install `c-fill-paragraph' on

`fill-paragraph-function'.  Although it's not the normal way to call
it in a CC Mode buffer it makes a direct call to `fill-paragraph' work
better.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index d251161489639c389a5c0762392abb6c94663186..888157367c6f927e74dcf606f2fc558067adbf16 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,10 @@
+2003-02-09  Martin Stjernholm  <mast@lysator.liu.se>
+
+       * progmodes/cc-mode.el (c-basic-common-init): Install
+       `c-fill-paragraph' on `fill-paragraph-function'.  Although
+       it's not the normal way to call it in a CC Mode buffer it
+       makes a direct call to `fill-paragraph' work better.
+
 2003-02-08  Kim F. Storm  <storm@cua.dk>
 
        * printing.el (pr-get-symbol): Define during compile.

diff --git a/lisp/progmodes/cc-mode.el b/lisp/progmodes/cc-mode.el
index 2073a4a3371a210bf0edb91b14d251f21c321d31..94eb6fcaea4dd41e1f3502b10b9af01de1fd3776 100644 (file)
--- a/lisp/progmodes/cc-mode.el
+++ b/lisp/progmodes/cc-mode.el
@@ -335,6 +335,12 @@
        comment-start-skip "/\\*+ *\\|//+ *"
        comment-multi-line t)
 
+  ;; Install `c-fill-paragraph' on `fill-paragraph-function' so that a
+  ;; direct call to `fill-paragraph' behaves better.  This still
+  ;; doesn't work with filladapt but it's better than nothing.
+  (make-local-variable 'fill-paragraph-function)
+  (setq fill-paragraph-function 'c-fill-paragraph)
+
   ;; Set `require-final-newline' only if we should.
   (let ((rfn (assq mode c-require-final-newline)))
     (when rfn