BSD 4_3 development

[unix-history] / usr / lib / lisp / cmuedit.l

diff --git a/usr/lib/lisp/cmuedit.l b/usr/lib/lisp/cmuedit.l
index c8b0386..afdebbe 100644 (file)
--- a/usr/lib/lisp/cmuedit.l
+++ b/usr/lib/lisp/cmuedit.l
@@ -1,3 +1,6 @@
+(setq rcs-cmuedit-
+   "$Header: /usr/lib/lisp/cmuedit.l,v 1.1 83/01/29 18:33:36 jkf Exp $")
+

 (eval-when (compile load eval) (load 'cmumacs) (load 'cmufncs))
 
 (declare (special c2 c3 tem nopr %changes))
 (eval-when (compile load eval) (load 'cmumacs) (load 'cmufncs))
 
 (declare (special c2 c3 tem nopr %changes))


@@ -1195,7 +1198,7 @@
                    (setq l
                          ((lambda (l)
                                   (cond ((atom (car coms))
                    (setq l
                          ((lambda (l)
                                   (cond ((atom (car coms))

-                                         (editcom (car coms)))
+                                         (editcom (car coms) nil))

                                         (t (editcoms (car coms))))
                                   l)
                           l))))
                                         (t (editcoms (car coms))))
                                   l)
                           l))))