* textmodes/makeinfo.el (makeinfo-buffer): Make it work also for

remote `buffer-file-name'.
This commit is contained in:
Michael Albinus 2014-11-23 11:49:31 +01:00
parent b7b18c73f9
commit 4de28b1a76
2 changed files with 11 additions and 5 deletions

View file

@ -1,3 +1,8 @@
2014-11-23 Michael Albinus <michael.albinus@gmx.de>
* textmodes/makeinfo.el (makeinfo-buffer): Make it work also for
remote `buffer-file-name'.
2014-11-23 Leo Liu <sdl.web@gmail.com>
* calendar/diary-lib.el (calendar-mark-1): Fix thinko.

View file

@ -253,11 +253,12 @@ Use the \\[next-error] command to move to the next error
(setq makeinfo-output-node-name (makeinfo-current-node))
(save-excursion
(makeinfo-compile
(concat makeinfo-run-command " " makeinfo-options
" " buffer-file-name)
nil
'makeinfo-compilation-sentinel-buffer)))
(let ((default-directory (file-name-directory buffer-file-name)))
(makeinfo-compile
(concat makeinfo-run-command " " makeinfo-options
" " (file-name-nondirectory buffer-file-name))
nil
'makeinfo-compilation-sentinel-buffer))))
(defun makeinfo-compilation-sentinel-buffer (proc msg)
"Sentinel for `makeinfo-compile' run from `makeinfo-buffer'."