HCoop
/
bpt
/
emacs.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
3c61e53
)
(info-insert-file-contents): Don't use
author
Richard M. Stallman
<rms@gnu.org>
Mon, 8 May 1995 23:23:37 +0000
(23:23 +0000)
committer
Richard M. Stallman
<rms@gnu.org>
Mon, 8 May 1995 23:23:37 +0000
(23:23 +0000)
(file-name-directory fullname) if it is nil.
(info-insert-file-contents): Fix Apr 19 change.
lisp/info.el
patch
|
blob
|
blame
|
history
diff --git
a/lisp/info.el
b/lisp/info.el
index
0501fab
..
77973c9
100644
(file)
--- a/
lisp/info.el
+++ b/
lisp/info.el
@@
-165,7
+165,8
@@
Do the right thing if the file has been compressed or zipped."
(insert-file-contents fullname visit)
(if decoder
(let ((buffer-read-only nil)
- (default-directory (file-directory fullname)))
+ (default-directory (or (file-name-directory fullname)
+ default-directory)))
(shell-command-on-region (point-min) (point-max) decoder t)))))
;;;###autoload (add-hook 'same-window-buffer-names "*info*")