From 08171162f7cb81d451752621cec46b898212c1ad Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Sat, 17 Nov 2001 00:48:14 +0000 Subject: [PATCH] (cvs-prefix-define): Don't defconst a variable. --- lisp/pcvs-util.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lisp/pcvs-util.el b/lisp/pcvs-util.el index 264d3496e15..9b1768f32e7 100644 --- a/lisp/pcvs-util.el +++ b/lisp/pcvs-util.el @@ -5,7 +5,7 @@ ;; Author: Stefan Monnier ;; Keywords: pcl-cvs -;; Revision: $Id: pcvs-util.el,v 1.13 2001/07/16 07:46:48 pj Exp $ +;; Revision: $Id: pcvs-util.el,v 1.14 2001/10/03 20:28:01 monnier Exp $ ;; This file is part of GNU Emacs. @@ -350,7 +350,7 @@ If it is \\[universal-argument] \\[universal-argument], behave just `(progn (defvar ,sym nil ,(concat (or docstring "") " See `cvs-prefix-set' for further description of the behavior.")) - (defconst ,cps + (defvar ,cps (let ((defaults ,defaults)) ;; sanity ensurance (unless (>= (length defaults) cvs-prefix-number) -- 2.39.2