changeset 80962:c67984592170

Kevin Ryde <user42 at zip.com.au> (Info-fontify-node): Fontify https as well as http and ftp.
author Glenn Morris <rgm@gnu.org>
date Sat, 19 May 2007 04:46:32 +0000
parents 80eae28ab5d7
children 8730a7d19614
files lisp/info.el
diffstat 1 files changed, 2 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/info.el	Sat May 19 04:45:30 2007 +0000
+++ b/lisp/info.el	Sat May 19 04:46:32 2007 +0000
@@ -4074,7 +4074,8 @@
       ;; Fontify http and ftp references
       (goto-char (point-min))
       (when not-fontified-p
-        (while (re-search-forward "[hf]t?tp://[^ \t\n\"`({<>})']+" nil t)
+        (while (re-search-forward "\\(https?\\|ftp\\)://[^ \t\n\"`({<>})']+"
+                                  nil t)
           (add-text-properties (match-beginning 0) (match-end 0)
                                '(font-lock-face info-xref
                                                 mouse-face highlight