From 81e1dcfd96eaac033e5f53c5a2671d627c0817c3 Mon Sep 17 00:00:00 2001 From: Katsumi Yamaoka Date: Tue, 7 Dec 2010 01:18:41 +0000 Subject: [PATCH] shr.el (shr-find-fill-point): Don't break a line after a kinsoku-bol character if a non-breakable character follows. --- lisp/ChangeLog | 5 +++++ lisp/shr.el | 2 +- 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index a4bbf35df..bb4f914c0 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2010-12-07 Katsumi Yamaoka + + * shr.el (shr-find-fill-point): Don't break a line after a kinsoku-bol + character if a non-breakable character follows. + 2010-12-06 Lars Magne Ingebrigtsen * proto-stream.el (proto-stream-open-tls): Return nil if we don't get diff --git a/lisp/shr.el b/lisp/shr.el index fafe3d94d..4f3af112a 100644 --- a/lisp/shr.el +++ b/lisp/shr.el @@ -304,8 +304,8 @@ redirects somewhere else." (if (eq (preceding-char) ?') (not (memq (char-after (- (point) 2)) (list nil ?\n ? ))) - ;; There're some kinsoku CJK chars that aren't breakable. (and (shr-char-kinsoku-bol-p (preceding-char)) + (shr-char-breakable-p (following-char)) (not (shr-char-kinsoku-bol-p (following-char))))) (shr-char-kinsoku-eol-p (following-char)))) (backward-char 1)) -- 2.34.1