From d2f795854ea4d0eb76b470779e38e5f8a23e9847 Mon Sep 17 00:00:00 2001 From: Thien-Thi Nguyen Date: Tue, 18 Dec 2007 09:21:28 +0000 Subject: * progmodes/cc-vars.el (defcustom-c-stylevar): Eval VAL. (c-comment-continuation-stars): No longer declare with cc-bytecomp-obsolete-var and cc-bytecomp-defvar. (c-block-comment-prefix): Use symbol-value to access c-comment-continuation-stars. * progmodes/cc-mode.el (c-initialize-cc-mode): Use symbol-value to access c-comment-continuation-stars. --- lisp/progmodes/cc-vars.el | 9 +++++---- 1 file changed, 5 insertions(+), 4 deletions(-) (limited to 'lisp/progmodes/cc-vars.el') diff --git a/lisp/progmodes/cc-vars.el b/lisp/progmodes/cc-vars.el index c071569d694..6110ab2250f 100644 --- a/lisp/progmodes/cc-vars.el +++ b/lisp/progmodes/cc-vars.el @@ -183,7 +183,7 @@ the value set here overrides the style system (there is a variable (newt (append (unless (plist-get tail :tag) '(:tag "Override style settings")) (unless (plist-get tail :value) - `(:value ,val)) + `(:value ,(eval val))) tail)) (aggregate `'(radio (const :tag "Use style settings" set-from-style) @@ -440,12 +440,13 @@ comment-only lines." ;; Although c-comment-continuation-stars is obsolete, we look at it in ;; some places in CC Mode anyway, so make the compiler ignore it ;; during our compilation. -(cc-bytecomp-obsolete-var c-comment-continuation-stars) -(cc-bytecomp-defvar c-comment-continuation-stars) +;; [This is unclean; better to use `symbol-value'. --ttn] +;;(cc-bytecomp-obsolete-var c-comment-continuation-stars) +;;(cc-bytecomp-defvar c-comment-continuation-stars) (defcustom-c-stylevar c-block-comment-prefix (if (boundp 'c-comment-continuation-stars) - c-comment-continuation-stars + (symbol-value 'c-comment-continuation-stars) "* ") "*Specifies the line prefix of continued C-style block comments. You should set this variable to the literal string that gets inserted -- cgit v1.2.3