diff options
| author | Vincent Belaïche | 2018-06-27 15:18:52 +0200 |
|---|---|---|
| committer | Vincent Belaïche | 2018-06-27 15:18:52 +0200 |
| commit | 5924259f152260551e2d153e1273ab600ccda293 (patch) | |
| tree | 4a51ca4033fd5a12a2381cdc59356dd4e26ee723 /lisp | |
| parent | 513b97c0e94f5c25dd9ac82aea86c9eba248589d (diff) | |
| download | emacs-5924259f152260551e2d153e1273ab600ccda293.tar.gz emacs-5924259f152260551e2d153e1273ab600ccda293.zip | |
Allow 'file:' protocol for Info-follow-nearest-node.
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/info.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/info.el b/lisp/info.el index c45b7f9cb3e..ab2c51d84bf 100644 --- a/lisp/info.el +++ b/lisp/info.el | |||
| @@ -3938,8 +3938,8 @@ If FORK is a string, it is the name to use for the new buffer." | |||
| 3938 | If FORK is non-nil, it is passed to `Info-goto-node'." | 3938 | If FORK is non-nil, it is passed to `Info-goto-node'." |
| 3939 | (let (node) | 3939 | (let (node) |
| 3940 | (cond | 3940 | (cond |
| 3941 | ((setq node (Info-get-token (point) "[hf]t?tps?://" | 3941 | ((setq node (Info-get-token (point) "\\(?:f\\(?:ile\\|tp\\)\\|https?\\)://" |
| 3942 | "\\([hf]t?tps?://[^ \t\n\"`‘({<>})’']+\\)")) | 3942 | "\\(\\(?:f\\(?:ile\\|tp\\)\\|https?\\)://[^ \t\n\"`‘({<>})’']+\\)")) |
| 3943 | (browse-url node) | 3943 | (browse-url node) |
| 3944 | (setq node t)) | 3944 | (setq node t)) |
| 3945 | ((setq node (Info-get-token (point) "\\*note[ \n\t]+" | 3945 | ((setq node (Info-get-token (point) "\\*note[ \n\t]+" |