[Emacs-diffs] emacs/lisp ChangeLog emacs-lisp/elp.el

[Juanma Barranquero]

CVSROOT:        /cvsroot/emacs
Module name:    emacs
Changes by:     Juanma Barranquero <lektu>      08/11/24 18:23:56

Modified files:
        lisp           : ChangeLog 
        lisp/emacs-lisp: elp.el 

Log message:
        * emacs-lisp/elp.el (elp-instrument-list): Fix 2nd arg of `signal'.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/ChangeLog?cvsroot=emacs&r1=1.14850&r2=1.14851
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/emacs-lisp/elp.el?cvsroot=emacs&r1=1.45&r2=1.46

Patches:
Index: ChangeLog
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/ChangeLog,v
retrieving revision 1.14850
retrieving revision 1.14851
diff -u -b -r1.14850 -r1.14851
--- ChangeLog   24 Nov 2008 17:37:44 -0000      1.14850
+++ ChangeLog   24 Nov 2008 18:23:53 -0000      1.14851
@@ -1,3 +1,7 @@
+2008-11-24  Juanma Barranquero  <address@hidden>
+
+       * emacs-lisp/elp.el (elp-instrument-list): Fix 2nd arg of `signal'.
+
 2008-11-24  Andreas Schwab  <address@hidden>
 
        * image.el (image-type-header-regexps): Recognize more xbm format

Index: emacs-lisp/elp.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/emacs-lisp/elp.el,v
retrieving revision 1.45
retrieving revision 1.46
diff -u -b -r1.45 -r1.46
--- emacs-lisp/elp.el   24 Nov 2008 15:09:02 -0000      1.45
+++ emacs-lisp/elp.el   24 Nov 2008 18:23:55 -0000      1.46
@@ -345,7 +345,7 @@
 If called interactively, read LIST using the minibuffer."
   (interactive "PList of functions to instrument: ")
   (unless (listp list)
-    (signal 'wrong-type-argument 'listp list))
+    (signal 'wrong-type-argument (list 'listp list)))
   (let ((list (or list elp-function-list)))
     (mapcar 'elp-instrument-function list)))