mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2024-11-22 07:09:54 +00:00
* lisp/doc-view.el (doc-view-start-process): Handle url-handler directories.
This commit is contained in:
parent
fb549d640a
commit
efb3f01dba
@ -1,3 +1,7 @@
|
||||
2013-04-16 Stefan Monnier <monnier@iro.umontreal.ca>
|
||||
|
||||
* doc-view.el (doc-view-start-process): Handle url-handler directories.
|
||||
|
||||
2013-04-15 Dmitry Gutov <dgutov@yandex.ru>
|
||||
|
||||
* progmodes/ruby-mode.el (ruby-beginning-of-defun)
|
||||
|
@ -881,8 +881,8 @@ Should be invoked when the cached images aren't up-to-date."
|
||||
(defun doc-view-start-process (name program args callback)
|
||||
;; Make sure the process is started in an existing directory, (rather than
|
||||
;; some file-name-handler-managed dir, for example).
|
||||
(let* ((default-directory (if (file-readable-p default-directory)
|
||||
default-directory
|
||||
(let* ((default-directory (or (unhandled-file-name-directory
|
||||
default-directory)
|
||||
(expand-file-name "~/")))
|
||||
(proc (apply 'start-process name doc-view-conversion-buffer
|
||||
program args)))
|
||||
|
Loading…
Reference in New Issue
Block a user