GNU bug report logs - #14751
24.3.50; Global binding and a tool bar icon for browsing the web

Previous Next

Full log

View this message in rfc822 format

From: Juri Linkov <juri <at> jurta.org>
To: Drew Adams <drew.adams <at> oracle.com>
Cc: 14751 <at> debbugs.gnu.org, Stefan Monnier <monnier <at> IRO.UMontreal.CA>, Jambunathan K <kjambunathan <at> gmail.com>
Subject: bug#14751: 24.3.50; Global binding and a tool bar icon for browsing the web
Date: Wed, 03 Jul 2013 01:51:56 +0300

> It is helpful to have a key that follows a URL at point.

`M-x ffap-bindings RET C-x C-f http://www.gnu.org/software/emacs/ RET'

> (I do suggest adding the start-browsing command to a menu, though.)

=== modified file 'lisp/menu-bar.el'
--- lisp/menu-bar.el	2013-02-25 21:10:59 +0000
+++ lisp/menu-bar.el	2013-07-02 22:47:53 +0000
@@ -1490,6 +1490,8 @@ (defvar menu-bar-tools-menu
     (bindings--define-key menu [separator-net]
       menu-bar-separator)
 
+    (bindings--define-key menu [browse-web]
+      '(menu-item "Browse the Web..." eww))
     (bindings--define-key menu [directory-search]
       '(menu-item "Directory Search" eudc-tools-menu))
     (bindings--define-key menu [compose-mail]


Also since it's verified that `eww' can correctly display gnu.org pages
without problems, the link "Emacs Guided Tour" on the start page could
be opened using eww (with an additional benefit of demonstrating to
newbies that Emacs can be used to browse the Web):

=== modified file 'lisp/startup.el'
--- lisp/startup.el	2013-06-30 22:29:23 +0000
+++ lisp/startup.el	2013-07-02 22:44:38 +0000
@@ -1674,6 +1674,7 @@ (defun fancy-startup-screen (&optional c
 	(insert "\n")
 	(fancy-startup-tail concise))
       (use-local-map splash-screen-keymap)
+      (setq-local browse-url-browser-function 'eww-browse-url)
       (setq tab-width 22
 	    buffer-read-only t)
       (set-buffer-modified-p nil)
@@ -1711,6 +1712,7 @@ (defun fancy-about-screen ()
 	(goto-char (point-min))
 	(force-mode-line-update))
       (use-local-map splash-screen-keymap)
+      (setq-local browse-url-browser-function 'eww-browse-url)
       (setq tab-width 22)
       (setq buffer-read-only t)
       (goto-char (point-min))

Previous Next

GNU bug tracking system
Copyright (C) 1999 Darren O. Benham, 1997,2003 nCipher Corporation Ltd, 1994-97 Ian Jackson.