diff options
| author | Richard M. Stallman <rms@gnu.org> | 1998-05-24 16:47:05 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1998-05-24 16:47:05 +0000 |
| commit | e81d27c2cf7e0bd41b44c53faf91664f2126154b (patch) | |
| tree | e1a7fccedf65321509991f83f9156cf3f4480dc9 | |
| parent | e18a235e39b535f4c0d1c2d9cb5ee92aad409616 (diff) | |
| download | emacs-e81d27c2cf7e0bd41b44c53faf91664f2126154b.tar.gz | |
(find-compressed-version): Don't set `error' here.
| -rw-r--r-- | lisp/uncompress.el | 4 |
1 files changed, 3 insertions, 1 deletions
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) |