From: Richard M. Stallman <rms@gnu.org>
Date: Sun, 24 May 1998 16:47:05 +0000 (+0000)
Subject: (find-compressed-version): Don't set `error' here.
X-Git-Tag: emacs-20.3~867
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=e81d27c2cf7e0bd41b44c53faf91664f2126154b;p=emacs.git

(find-compressed-version): Don't set `error' here.
---

diff --git a/lisp/uncompress.el b/lisp/uncompress.el
index d809f81bd79..ceaa0dac1ba 100644
--- a/lisp/uncompress.el
+++ b/lisp/uncompress.el
@@ -99,7 +99,9 @@ It then selects a major mode from the uncompressed file name and contents."
 	(progn
 	  (insert-file-contents buffer-file-name t)
 	  (goto-char (point-min))
-	  (setq error nil)
+	  ;; No need for this, because error won't be set to t
+	  ;; if this function returns t.
+	  ;; (setq error nil)
 	  t))))
 
 (provide 'uncompress)