# HG changeset patch
# User Stefan Monnier <monnier@iro.umontreal.ca>
# Date 1002140881 0
# Node ID 48d3de634dc8e93cdd952066ad8300ba50d935ad
# Parent  f23c447c3d9b5c53f05f374b948275b3faf176d9
(cvs-prefix-define): Typo cons->concat.

diff -r f23c447c3d9b -r 48d3de634dc8 lisp/pcvs-util.el
--- a/lisp/pcvs-util.el	Wed Oct 03 19:50:05 2001 +0000
+++ b/lisp/pcvs-util.el	Wed Oct 03 20:28:01 2001 +0000
@@ -5,7 +5,7 @@
 
 ;; Author: Stefan Monnier <monnier@cs.yale.edu>
 ;; Keywords: pcl-cvs
-;; Revision: $Id: pcvs-util.el,v 1.12 2001/04/13 14:56:10 monnier Exp $
+;; Revision: $Id: pcvs-util.el,v 1.13 2001/07/16 07:46:48 pj Exp $
 
 ;; This file is part of GNU Emacs.
 
@@ -348,7 +348,7 @@
 				 &optional qtypedesc hist-sym)
   (let ((cps (cvs-prefix-sym sym)))
     `(progn
-       (defvar ,sym nil ,(cons (or docstring "") "
+       (defvar ,sym nil ,(concat (or docstring "") "
 See `cvs-prefix-set' for further description of the behavior."))
        (defconst ,cps
 	 (let ((defaults ,defaults))