From 7784b779b8f06e8e88582464c65a0c5e15c0eeb5 Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Fri, 29 Nov 2013 16:35:00 -0500 Subject: [PATCH] =?utf8?q?*=20lisp/net/newst-reader.el=20(newsticker-html-?= =?utf8?q?renderer):=20Default=20to=20SHR=20if=20available.=20=20Suggested?= =?utf8?q?=20by=20Cl=C3=A9ment=20B.=20.?= MIME-Version: 1.0 Content-Type: text/plain; charset=utf8 Content-Transfer-Encoding: 8bit --- lisp/ChangeLog | 3 +++ lisp/net/newst-reader.el | 9 ++++++--- 2 files changed, 9 insertions(+), 3 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index b40773904bf..26c0f502334 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,5 +1,8 @@ 2013-11-29 Stefan Monnier + * net/newst-reader.el (newsticker-html-renderer): Default to SHR if + available. Suggested by Clément B. . + * uniquify.el (uniquify-buffer-name-style): Change default. * loadup.el: Preload "uniquify". diff --git a/lisp/net/newst-reader.el b/lisp/net/newst-reader.el index 21bb890f742..4d2e0118ac0 100644 --- a/lisp/net/newst-reader.el +++ b/lisp/net/newst-reader.el @@ -101,15 +101,18 @@ window is used when filling. See also `newsticker-justification'." :group 'newsticker-reader) (defcustom newsticker-html-renderer - nil + (if (fboundp 'libxml-parse-html-region) + #'shr-render-region) "Function for rendering HTML contents. If non-nil, newsticker.el will call this function whenever it -finds HTML-like tags in item descriptions. Possible functions -are `w3m-region', `w3-region', and `newsticker-htmlr-render'. +finds HTML-like tags in item descriptions. +Possible functions include `shr-render-region', `w3m-region', `w3-region', and +`newsticker-htmlr-render'. Newsticker automatically loads the respective package w3m, w3, or htmlr if this option is set." :type '(choice :tag "Function" (const :tag "None" nil) + (const :tag "SHR" shr-render-region) (const :tag "w3" w3-region) (const :tag "w3m" w3m-region) (const :tag "htmlr" newsticker-htmlr-render)) -- 2.39.2