commit/psgml: Jerry James: Modernize list of web browsers.
| Newsgroups | gmane.emacs.xemacs.patches |
|---|---|
| Message-ID | <[email protected]> |
1 new commit in psgml: https://bitbucket.org/xemacs/psgml/commits/bd13dcdc61d5/ Changeset: bd13dcdc61d5 User: Jerry James Date: 2014-06-14 19:13:46 Summary: Modernize list of web browsers. Also, allow use of the default browser, as defined by browse-url.el. See <CAHCOHQm305bPr2UHGVGVu0v0byjDfZwwgtkG6unjAJwg56TBuQ@mail.gmail.com> in xemacs-patches. Affected #: 2 files diff -r 6cb9f2b8abd9c2ea18420569237823b0ef347a0a -r bd13dcdc61d55aaddd44b1cf816719a88a8dd2d4 ChangeLog --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,10 @@ +2014-06-11 Jerry James <[email protected]> + + * psgml-html.el (sgml-html-menu): Modernize list of browsers. + Allow use of the default browser. + (sgml-html-netscape-file): Use firefox instead of netscape. + (sgml-html-kfm-file): Use konqueror instead of kfm. + 2014-05-15 Norbert Koch <[email protected]> * Makefile (VERSION): XEmacs package 1.47 released. diff -r 6cb9f2b8abd9c2ea18420569237823b0ef347a0a -r bd13dcdc61d55aaddd44b1cf816719a88a8dd2d4 psgml-html.el --- a/psgml-html.el +++ b/psgml-html.el @@ -931,25 +931,25 @@ (defvar sgml-html-menu (cons "HTML" - (append '(["View in Netscape" sgml-html-netscape-file - (buffer-file-name - (current-buffer))] + (append '(["View in default browser" browse-url-of-buffer t] + ["View in Firefox" sgml-html-netscape-file + (buffer-file-name (current-buffer))] + ["View in Konqueror" sgml-html-kfm-file + (buffer-file-name (current-buffer))] ["View in W3" w3-preview-this-buffer t] - ["View in kfm" sgml-html-kfm-file - (buffer-file-name (current-buffer))] "---" ["HTML-Quote Region" html-quote-region t] "---") (cdr sgml-main-menu)))) (defun sgml-html-netscape-file () - "Preview the file for the current buffer in Netscape." + "Preview the file for the current buffer in Firefox." (interactive) - (browse-url-netscape + (browse-url-firefox (concat "file:" (buffer-file-name (current-buffer))))) (defun sgml-html-kfm-file () - "Preview the file for the current buffer in kfm." + "Preview the file for the current buffer in Konqueror." (interactive) (browse-url-kde (concat "file:" (buffer-file-name (current-buffer))))) Repository URL: https://bitbucket.org/xemacs/psgml/ -- This is a commit notification from bitbucket.org. You are receiving this because you have the service enabled, addressing the recipient of this email.