[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] /srv/bzr/emacs/trunk r101998: shr.el: Fix last change.
From: |
Katsumi Yamaoka |
Subject: |
[Emacs-diffs] /srv/bzr/emacs/trunk r101998: shr.el: Fix last change. |
Date: |
Tue, 19 Oct 2010 08:19:45 +0000 |
User-agent: |
Bazaar (2.0.3) |
------------------------------------------------------------
revno: 101998
committer: Katsumi Yamaoka <address@hidden>
branch nick: trunk
timestamp: Tue 2010-10-19 08:19:45 +0000
message:
shr.el: Fix last change.
modified:
lisp/gnus/ChangeLog
lisp/gnus/shr.el
=== modified file 'lisp/gnus/ChangeLog'
--- a/lisp/gnus/ChangeLog 2010-10-19 07:57:50 +0000
+++ b/lisp/gnus/ChangeLog 2010-10-19 08:19:45 +0000
@@ -1,6 +1,6 @@
2010-10-19 Katsumi Yamaoka <address@hidden>
- * 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.
=== modified file 'lisp/gnus/shr.el'
--- a/lisp/gnus/shr.el 2010-10-19 07:57:50 +0000
+++ b/lisp/gnus/shr.el 2010-10-19 08:19:45 +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"
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] /srv/bzr/emacs/trunk r101998: shr.el: Fix last change.,
Katsumi Yamaoka <=