🚀 go-pugleaf

When I attempt to invoke a disabled-command, I get the error

  Wrong number of arguments: #<subr =>, 3

I decided that dumping cl.elc in my epoch was *not* the thing to do
and so compiled event.el without the (require 'cl) statement but after
loading cl.elc.  I'm using jwz's optimizing byte compiler, if that
makes a difference.  BTW, there is almost no code difference between
the following files:

-rw-r--r--  1 jerry    staff       10785 Jun  4 13:06 event.el
-rw-r--r--  1 jerry    staff       10717 Apr 24 15:32 event.el.orig

with a diff output of:

23,26c23,26
< ;;; $Revision: 1.5 $
< ;;; $Source: /import/kaplan/stable/distrib/epoch-4.0p2/epoch-lisp/RCS/event.el,v $
< ;;; $Date: 92/06/02 02:19:21 $
< ;;; $Author: marca $
---
> ;;; $Revision: 1.4 $
> ;;; $Source: /home/kaplan/love/epoch/epoch-lisp/RCS/event.el,v $
> ;;; $Date: 92/04/22 20:15:34 $
> ;;; $Author: love $
31,34c31
< 
< ;; Changed from mini-cl (due to mdb@NSD.3Com.COM).
< ;;(require 'cl)
< 
---
> (require 'mini-cl)
205c202
<   (display-buffer *event-status-fdisplay-buffer*)
---
>   (display-buffer *event-status-buffer*)

and some blank lines (I commented out the require).  Could someone
please explain the reason for the change?  I have problems with cl.el
with some of the packages I use.  I don't think the modest changes to
the file justify inclusion of cl.el.  It would be nice if common lisp
support were built into Emacs, but it's not.  The cl.el code is
circular and changes some functions--I refuse to dump it in my Epoch
4.0p2 and that's that!!  The ASCII emacs runs disabled-command-hook
with no problem.  I'm not blaming cl.el for the error--I don't know
what's causing it.


                             Jerry Graves
                          UTEP Math Sysadmin
                       jerry@math.ep.utexas.edu