Mercurial > emacs
changeset 10630:3e851e5cab1f
(c-mode-map): No binding for c-fill-paragraph
(c-fill-paragraph): Return t.
(c-mode): Put c-fill-paragraph in fill-paragraph-function.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Thu, 02 Feb 1995 09:48:01 +0000 |
| parents | 2c9bdcab7052 |
| children | dc245bfecc3b |
| files | lisp/progmodes/c-mode.el |
| diffstat | 1 files changed, 4 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/progmodes/c-mode.el Thu Feb 02 09:44:38 1995 +0000 +++ b/lisp/progmodes/c-mode.el Thu Feb 02 09:48:01 1995 +0000 @@ -45,7 +45,6 @@ (define-key c-mode-map "\e\C-q" 'indent-c-exp) (define-key c-mode-map "\ea" 'c-beginning-of-statement) (define-key c-mode-map "\ee" 'c-end-of-statement) -(define-key c-mode-map "\eq" 'c-fill-paragraph) (define-key c-mode-map "\C-c\C-n" 'c-forward-conditional) (define-key c-mode-map "\C-c\C-p" 'c-backward-conditional) (define-key c-mode-map "\C-c\C-u" 'c-up-conditional) @@ -226,6 +225,8 @@ (setq paragraph-separate paragraph-start) (make-local-variable 'paragraph-ignore-fill-prefix) (setq paragraph-ignore-fill-prefix t) + (make-local-variable 'fill-paragraph-function) + (setq fill-paragraph-function 'c-fill-paragraph) (make-local-variable 'indent-line-function) (setq indent-line-function 'c-indent-line) (make-local-variable 'indent-region-function) @@ -476,7 +477,8 @@ (forward-line -1) (fill-region-as-paragraph (point) (point-max))))))) ;; Outside of comments: do ordinary filling. - (fill-paragraph arg))))) + (fill-paragraph arg))) + t)) (defun electric-c-brace (arg) "Insert character and correct line's indentation."