Commit cfb966f4 authored by Martin Stjernholm's avatar Martin Stjernholm
Browse files

(c-setup-paragraph-variables): Made it interactive.

parent fa14078b
......@@ -484,13 +484,17 @@ variables."
;;
;; This function does not do any hidden buffer changes.
(interactive)
(setq c-current-comment-prefix
(if (listp c-comment-prefix-regexp)
(cdr-safe (or (assoc major-mode c-comment-prefix-regexp)
(assoc 'other c-comment-prefix-regexp)))
c-comment-prefix-regexp))
(let ((comment-line-prefix
(concat "[ \t]*\\(" c-current-comment-prefix "\\)[ \t]*")))
(setq paragraph-start (concat comment-line-prefix
c-paragraph-start
"\\|"
......@@ -508,6 +512,7 @@ variables."
(default-value 'adaptive-fill-regexp)
"\\)")
"")))
(when (boundp 'adaptive-fill-first-line-regexp)
;; XEmacs (20.x) adaptive fill mode doesn't have this.
(make-local-variable 'adaptive-fill-first-line-regexp)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment