From 3a3995f843cf0afedb780b8e1c74712b14b80000 Mon Sep 17 00:00:00 2001 From: Alan Mackenzie Date: Tue, 15 Jan 2008 23:56:38 +0000 Subject: [PATCH] (c-constant-symbol): Put this defun inside an eval-and-compile, so as to permit byte-compiling (e.g. in bootstrap). --- lisp/progmodes/cc-vars.el | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/lisp/progmodes/cc-vars.el b/lisp/progmodes/cc-vars.el index 5c5c4b3a001..8ee89170f19 100644 --- a/lisp/progmodes/cc-vars.el +++ b/lisp/progmodes/cc-vars.el @@ -74,7 +74,8 @@ Useful as last item in a `choice' widget." :value 'other)) ;; The next defun will supersede c-const-symbol. -(defun c-constant-symbol (sym len) +(eval-and-compile + (defun c-constant-symbol (sym len) "Create an uneditable symbol for customization buffers. SYM is the name of the symbol, LEN the length of the field (in characters) the symbol will be displayed in. LEN must be big @@ -89,7 +90,7 @@ within a customization type." `(const :size ,len :format ,disp - :value ,sym))) + :value ,sym)))) (define-widget 'c-const-symbol 'item "An uneditable lisp symbol. This is obsolete - -- 2.39.2