Fix buggy calls to `error' in the net/ directory.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 3c3c5b8aa4591052338eb750a4a5887a1e071317..239a7b08af148a9b825e1c14d5c1e928d255c13f 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,7 @@
 2007-12-06  D. Goel  <deego3@gmail.com>
 
+       * net/trampver.el (x): Ditto.
+
        * mail/uce.el (uce-reply-to-uce): Ditto.
 
        * mail/rmailout.el (rmail-output): Ditto.

diff --git a/lisp/net/trampver.el b/lisp/net/trampver.el
index 58ae73d8cd34f97161a3f2ac476ccfc66dda5cf9..0639210a1be1f06f7aeeb0214c45f8ff8cfed53c 100644 (file)
--- a/lisp/net/trampver.el
+++ b/lisp/net/trampver.el
@@ -38,7 +38,7 @@
 
 ;; Check for (X)Emacs version.
 (let ((x (if (or (< emacs-major-version 21)    (and (featurep 'xemacs)      (< emacs-minor-version 4)))    (format "Tramp 2.1.12-pre is not fit for %s"            (when (string-match "^.*$" (emacs-version))       (match-string 0 (emacs-version))))    "ok")))
-  (unless (string-match "\\`ok\\'" x) (error x)))
+  (unless (string-match "\\`ok\\'" x) (error "%s" x)))
 
 (provide 'trampver)