changeset 22210:f741b3e11e37

(find-compressed-version): Don't set `error' here.
author Richard M. Stallman <rms@gnu.org>
date Sun, 24 May 1998 16:47:05 +0000
parents 571020b7fc5e
children c8fa861cb852
files lisp/uncompress.el
diffstat 1 files changed, 3 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/uncompress.el	Sun May 24 07:30:16 1998 +0000
+++ b/lisp/uncompress.el	Sun May 24 16:47:05 1998 +0000
@@ -99,7 +99,9 @@
 	(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)