Fix typos in condition-case handlers.

4 files changed, 13 insertions, 6 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 28c45486308..78485a62ff0 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,10 @@
+2009-09-18  Glenn Morris  <rgm@gnu.org>
+
+        * net/eudc-bob.el (eudc-bob-pipe-object-to-external-program):
+        * net/eudc.el (eudc-expand-inline):
+        * net/newst-backend.el (newsticker--cache-read-feed): Fix typos in
+        condition-case handlers.
+
 2009-09-18  Nick Roberts  <nickrob@snap.net.nz>
 
         * progmodes/gdb-mi.el (gdb-frame-address): New variable.
diff --git a/lisp/net/eudc-bob.el b/lisp/net/eudc-bob.el
index 8c30819dd23..d65f0f12423 100644
--- a/lisp/net/eudc-bob.el
+++ b/lisp/net/eudc-bob.el
@@ -252,7 +252,7 @@ display a button."
                                    (car (cdr viewer))
                                    (cdr (cdr viewer)))
             (call-process-region (point-min) (point-max) program)))
-      (t
+      (error
        (kill-buffer buffer)))))
 
 (defun eudc-bob-menu ()
diff --git a/lisp/net/eudc.el b/lisp/net/eudc.el
index 6494e01f739..be3654728d8 100644
--- a/lisp/net/eudc.el
+++ b/lisp/net/eudc.el
@@ -1,7 +1,7 @@
 ;;; eudc.el --- Emacs Unified Directory Client
 
-;; Copyright (C) 1998, 1999, 2000, 2001, 2002, 2003, 2004,
-;;   2005, 2006, 2007, 2008, 2009 Free Software Foundation, Inc.
+;; Copyright (C) 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006,
+;;   2007, 2008, 2009  Free Software Foundation, Inc.
 
 ;; Author: Oscar Figueiredo <oscar@cpe.fr>
 ;; Maintainer: Pavel Janík <Pavel@Janik.cz>
@@ -931,7 +931,7 @@ see `eudc-inline-expansion-servers'"
           (or (and (equal eudc-server eudc-former-server)
                    (equal eudc-protocol eudc-former-protocol))
               (eudc-set-server eudc-former-server eudc-former-protocol t)))
-      (t
+      (error
        (or (and (equal eudc-server eudc-former-server)
                 (equal eudc-protocol eudc-former-protocol))
            (eudc-set-server eudc-former-server eudc-former-protocol t))
diff --git a/lisp/net/newst-backend.el b/lisp/net/newst-backend.el
index 6d8b32965b9..23c7e1450f9 100644
--- a/lisp/net/newst-backend.el
+++ b/lisp/net/newst-backend.el
@@ -2177,8 +2177,8 @@ FEED is a symbol!"
                                                   (read (current-buffer))))
           (error
            (message "Error while reading newsticker cache file %s!"
-                    file-name))
-          (setq newsticker--cache nil))))))
+                    file-name)
+           (setq newsticker--cache nil)))))))
 
 ;; ======================================================================
 ;;; Statistics