[Emacs-diffs] emacs/lisp ibuffer.el

[Kevin Ryde]

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Kevin Ryde <kryde>      09/10/18 23:11:14

Modified files:
        lisp           : ibuffer.el 

Log message:
        (ibuffer-confirm-operation-on): Correction to error
        re-throw, `err' is a pair not a list so can't use apply (Bug#4740).

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/ibuffer.el?cvsroot=emacs&r1=1.117&r2=1.118

Patches:
Index: ibuffer.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/ibuffer.el,v
retrieving revision 1.117
retrieving revision 1.118
diff -u -b -r1.117 -r1.118
--- ibuffer.el  1 Oct 2009 02:17:41 -0000       1.117
+++ ibuffer.el  18 Oct 2009 23:11:14 -0000      1.118
@@ -1191,7 +1191,7 @@
                                  ;; This definitely falls in the
                                  ;; ghetto hack category...
                                  (not (string-match "too small" (cadr err)))))
-                        (apply #'signal err)
+                        (signal (car err) (cdr err))
                       (enlarge-window 3))))))
              (select-window (next-window))
              (switch-to-buffer buf)