diff lisp/gutter-items.el @ 4755:c1784fd59d7d

Fix syntax of some uses of condition-case and with-trapping-errors.
author Stephen J. Turnbull <stephen@xemacs.org>
date Wed, 18 Nov 2009 01:10:56 +0900
parents 16b17fd1dc93
children cd167465bf69 308d34e9f07d
line wrap: on
line diff
--- a/lisp/gutter-items.el	Wed Nov 18 01:06:53 2009 +0900
+++ b/lisp/gutter-items.el	Wed Nov 18 01:10:56 2009 +0900
@@ -540,11 +540,10 @@
 
 (defun progress-feedback-dispatch-non-command-events ()
   ;; don't allow errors to hose things
-  (condition-case t 
-      ;; (sit-for 0) is too agressive and cause more display than we
-      ;; want.
+  (condition-case nil 
+      ;; (sit-for 0) causes more redisplay than we want.
       (dispatch-non-command-events)
-    nil))
+    (t nil)))
 
 (defun append-progress-feedback (label message &optional value frame)
   (or frame (setq frame (selected-frame)))