[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: Patch: goto-address minor modes
From: |
Juri Linkov |
Subject: |
Re: Patch: goto-address minor modes |
Date: |
Wed, 14 Jan 2009 02:27:16 +0200 |
User-agent: |
Gnus/5.13 (Gnus v5.13) Emacs/23.0.60 (x86_64-pc-linux-gnu) |
goto-address-mode is now a minor mode like bug-reference-mode.
bug-reference-mode uses the `link' face to highlight links,
but goto-address-mode still uses `bold'. The following patch
changes address urls to be highlighted in the `link' face.
Also it takes a new minor mode into use in several places:
Index: lisp/net/goto-addr.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/net/goto-addr.el,v
retrieving revision 1.35
diff -u -r1.35 goto-addr.el
--- lisp/net/goto-addr.el 5 Jan 2009 03:22:44 -0000 1.35
+++ lisp/net/goto-addr.el 14 Jan 2009 00:21:07 -0000
@@ -129,7 +129,7 @@
m)
"Keymap to hold goto-addr's mouse key defs under highlighted URLs.")
-(defcustom goto-address-url-face 'bold
+(defcustom goto-address-url-face 'link
"Face to use for URLs."
:type 'face
:group 'goto-address)
Index: etc/MORE.STUFF
===================================================================
RCS file: /sources/emacs/emacs/etc/MORE.STUFF,v
retrieving revision 1.73
diff -u -r1.73 MORE.STUFF
--- etc/MORE.STUFF 8 Jan 2009 05:11:57 -0000 1.73
+++ etc/MORE.STUFF 14 Jan 2009 00:21:35 -0000
@@ -270,7 +270,7 @@
Local Variables:
mode: text
mode: view
-eval: (goto-address)
+mode: goto-address
End:
This file is part of GNU Emacs.
Index: lisp/help.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/help.el,v
retrieving revision 1.345
diff -u -r1.345 help.el
--- lisp/help.el 5 Jan 2009 03:19:17 -0000 1.345
+++ lisp/help.el 14 Jan 2009 00:23:37 -0000
@@ -294,7 +294,7 @@
(defun view-help-file (file &optional dir)
(view-file (expand-file-name file (or dir data-directory)))
- (goto-address)
+ (goto-address-mode t)
(goto-char (point-min)))
(defun describe-distribution ()
Index: lisp/menu-bar.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/menu-bar.el,v
retrieving revision 1.349
diff -u -r1.349 menu-bar.el
--- lisp/menu-bar.el 13 Jan 2009 13:58:13 -0000 1.349
+++ lisp/menu-bar.el 14 Jan 2009 00:23:54 -0000
@@ -1492,7 +1492,7 @@
(let (enable-local-variables)
(view-file (expand-file-name "MORE.STUFF"
data-directory))
- (goto-address)))
+ (goto-address-mode t)))
(define-key menu-bar-help-menu [sep2]
'("--"))
(define-key menu-bar-help-menu [external-packages]
--
Juri Linkov
http://www.jurta.org/emacs/
- Re: Patch: goto-address minor modes,
Juri Linkov <=
- Re: Patch: goto-address minor modes, Chong Yidong, 2009/01/13
- Re: Patch: goto-address minor modes, Dan Nicolaescu, 2009/01/14
- Re: Patch: goto-address minor modes, Lennart Borgman, 2009/01/14
- Re: Patch: goto-address minor modes, Juri Linkov, 2009/01/14
- Re: Patch: goto-address minor modes, Dan Nicolaescu, 2009/01/14
- Re: Patch: goto-address minor modes, Lennart Borgman, 2009/01/14
- Re: Patch: goto-address minor modes, Juri Linkov, 2009/01/14
- Re: Patch: goto-address minor modes, Stefan Monnier, 2009/01/14
- Re: Patch: goto-address minor modes, Juri Linkov, 2009/01/14
- Re: Patch: goto-address minor modes, Lennart Borgman, 2009/01/14