*** empty log message ***

[gnus] / lisp / gnus-sum.el

diff --git a/lisp/gnus-sum.el b/lisp/gnus-sum.el
index e7f1d24..7443ee8 100644 (file)
--- a/lisp/gnus-sum.el
+++ b/lisp/gnus-sum.el
@@ -4240,7 +4240,7 @@ The resulting hash table is returned, or nil if no Xrefs were found."
   '(prog1
        (if (= (following-char) ?\t)
           0
-        (let ((num (condition-case nil (read buffer) (error nil))))
+        (let ((num (ignore-errors (read buffer))))
           (if (numberp num) num 0)))
      (unless (eobp)
        (forward-char 1))))
@@ -8061,9 +8061,8 @@ save those articles instead."
            (when (cond
                   ((stringp match)
                    ;; Regular expression.
-                   (condition-case ()
-                       (re-search-forward match nil t)
-                     (error nil)))
+                   (ignore-errors
+                     (re-search-forward match nil t)))
                   ((gnus-functionp match)
                    ;; Function.
                    (save-restriction