diff options
| author | Michael Albinus | 2021-06-07 13:45:38 +0200 |
|---|---|---|
| committer | Michael Albinus | 2021-06-07 13:45:38 +0200 |
| commit | c8d4af863727d25adc71f7bec906fddbd0fa0d58 (patch) | |
| tree | 54e57666cb48dcd0e6a41c24be1346f361a3c917 | |
| parent | 82ccc3afcf9ed1f8b22ed5634e788879cd1af279 (diff) | |
| download | emacs-c8d4af863727d25adc71f7bec906fddbd0fa0d58.tar.gz emacs-c8d4af863727d25adc71f7bec906fddbd0fa0d58.zip | |
Support remote file names in `browse-url-of-buffer'
* lisp/net/browse-url.el (browse-url-of-buffer): Use temporary
file in case of remote `file-name'. (Bug#48397)
| -rw-r--r-- | lisp/net/browse-url.el | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/net/browse-url.el b/lisp/net/browse-url.el index 8157422d6f0..0220c7adf6e 100644 --- a/lisp/net/browse-url.el +++ b/lisp/net/browse-url.el | |||
| @@ -806,6 +806,7 @@ narrowed." | |||
| 806 | (or buffer-file-name | 806 | (or buffer-file-name |
| 807 | (and (boundp 'dired-directory) dired-directory))))) | 807 | (and (boundp 'dired-directory) dired-directory))))) |
| 808 | (when (or (not file-name) | 808 | (when (or (not file-name) |
| 809 | (file-remote-p file-name) | ||
| 809 | ;; This can happen when we're looking at a file from a | 810 | ;; This can happen when we're looking at a file from a |
| 810 | ;; zip file buffer, for instance. | 811 | ;; zip file buffer, for instance. |
| 811 | (not (file-exists-p file-name))) | 812 | (not (file-exists-p file-name))) |