* riece-signal.el (riece-emit-signal): Use riece-funcall-ignore-errors.
authorDaiki Ueno <ueno@unixuser.org>
Sat, 19 Feb 2005 08:29:57 +0000 (08:29 +0000)
committerDaiki Ueno <ueno@unixuser.org>
Sat, 19 Feb 2005 08:29:57 +0000 (08:29 +0000)
lisp/riece-signal.el

index e972580..7fd6b53 100644 (file)
@@ -105,9 +105,10 @@ This function is for internal use only."
            slots (symbol-value symbol))
       (while slots
        (if (or (null (riece-slot-filter (car slots)))
-               (riece-ignore-errors (format "signal filter for \"%S\""
-                                            signal-name)
-                 (funcall (riece-slot-filter (car slots)) signal)))
+               (riece-funcall-ignore-errors (format "signal filter for \"%S\""
+                                                    signal-name)
+                                            (riece-slot-filter (car slots))
+                                            signal))
            (riece-funcall-ignore-errors (format "slot function for \"%S\""
                                                 signal-name)
                                         (riece-slot-function (car slots))