Mercurial > emacs
changeset 111033:8ad626575f8a
shr.el: Fix last change.
| author | Katsumi Yamaoka <yamaoka@jpl.org> |
|---|---|
| date | Tue, 19 Oct 2010 08:19:45 +0000 |
| parents | 1ed05f12a0bc |
| children | e02e55f79038 |
| files | lisp/gnus/ChangeLog lisp/gnus/shr.el |
| diffstat | 2 files changed, 3 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/gnus/ChangeLog Tue Oct 19 07:57:50 2010 +0000 +++ b/lisp/gnus/ChangeLog Tue Oct 19 08:19:45 2010 +0000 @@ -1,6 +1,6 @@ 2010-10-19 Katsumi Yamaoka <yamaoka@jpl.org> - * shr.el: Load kinsoku. + * shr.el: Load kinsoku if necessary. (shr-kinsoku-shorten): New internal variable. (shr-find-fill-point): Make kinsoku shorten text line if shr-kinsoku-shorten is bound to non-nil.
--- a/lisp/gnus/shr.el Tue Oct 19 07:57:50 2010 +0000 +++ b/lisp/gnus/shr.el Tue Oct 19 08:19:45 2010 +0000 @@ -32,7 +32,8 @@ (eval-when-compile (require 'cl)) (require 'browse-url) -(load "kinsoku" nil t) +(unless (aref (char-category-set (make-char 'japanese-jisx0208 33 35)) ?>) + (load "kinsoku" nil t)) (defgroup shr nil "Simple HTML Renderer"