Bug fix in pcl-cvs.el
There is a bug in the file pcl-cvs.el.
In the function cvs-run-process, if the variable cvs-cvsroot is defined,
an error is generated (Malformed list: (? \ -?d. / tmp)).
This error was caused by a lisp code error.
Following lines (in the functioncvs-run-process):
;; Generate the command line
(setq args (append (if cvs-cvsroot (append "-d" cvs-cvsroot))
pre-args
(list cvs-command)
post-args))
must be rewritten in:
;; Generate the command line
(setq args (append (if cvs-cvsroot (list "-d" cvs-cvsroot))
pre-args
(list cvs-command)
post-args))
In attachement the patch for pcl-cvs.el
Best regards, yves.
--
\\\|///
\\ ~ ~ //
( ＠ ＠ )
*-----------------------------oOOo-(_)-oOOo----------------------------*
| Yves BLUSSEAU | E-Mail: blusseau(a)pharmacie.unicaen.fr |
| | Home Page: http://www.pharmacie.unicaen.fr/blusseau |
| | ICQ: 7761321 |
| | PGP Key: send me an E-Mail with SEND PGP KEYS |
| | as Subject |
|----------------------------------------------------------------------|
| For automated information on various subjects, send an e-mail to my |
| E-Mail address with SEND HELP on the Subject line. |
*-------------------------------------Oooo.----------------------------*
.oooO ( )
( ) ) /
\ ( (_/
\_)
--- lisp/pcl-cvs/pcl-cvs.el~ Wed Dec 9 21:35:37 1998
+++ lisp/pcl-cvs/pcl-cvs.el Mon Jun 14 09:59:32 1999
＠＠ -1310,7 +1310,7 ＠＠
(eq (process-status cvs-process-running) 'stop)))
(error "Can not (yet) run two cvs processes simultaneously."))
;; Generate the command line
- (setq args (append (if cvs-cvsroot (append "-d" cvs-cvsroot))
+ (setq args (append (if cvs-cvsroot (list "-d" cvs-cvsroot))
pre-args
(list cvs-command)
post-args))
--- lisp/pcl-cvs/ChangeLog.old Wed Jun 16 10:49:17 1999
+++ lisp/pcl-cvs/ChangeLog Wed Jun 16 10:52:30 1999
＠＠ -1,3 +1,8 ＠＠
+1999-06-16 Yves BLUSSEAU <blusseau(a)pharmacie.unicaen.fr>
+
+ * pcl-cvs.el (cvs-run-process): bugfix about an error that is
+ generated if the variable cvs-cvsroot is defined.
+
1998-11-17 Greg Klanderman <greg(a)alphatech.com>
* pcl-cvs.el (cvs-retrieve-revision-to-tmpfile): bugfix for remote