Commit 6568edea authored by Katsumi Yamaoka's avatar Katsumi Yamaoka
Browse files

shr.el (shr-find-fill-point): Don't break a line after a kinsoku-bol character...

shr.el (shr-find-fill-point): Don't break a line after a kinsoku-bol character if a non-breakable character follows.
parent 516aa569
2010-12-07 Katsumi Yamaoka <yamaoka@jpl.org>
* 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 <larsi@gnus.org> 2010-12-06 Lars Magne Ingebrigtsen <larsi@gnus.org>
   
* proto-stream.el (proto-stream-open-tls): Return nil if we don't get * proto-stream.el (proto-stream-open-tls): Return nil if we don't get
......
...@@ -304,8 +304,8 @@ redirects somewhere else." ...@@ -304,8 +304,8 @@ redirects somewhere else."
(if (eq (preceding-char) ?') (if (eq (preceding-char) ?')
(not (memq (char-after (- (point) 2)) (not (memq (char-after (- (point) 2))
(list nil ?\n ? ))) (list nil ?\n ? )))
;; There're some kinsoku CJK chars that aren't breakable.
(and (shr-char-kinsoku-bol-p (preceding-char)) (and (shr-char-kinsoku-bol-p (preceding-char))
(shr-char-breakable-p (following-char))
(not (shr-char-kinsoku-bol-p (following-char))))) (not (shr-char-kinsoku-bol-p (following-char)))))
(shr-char-kinsoku-eol-p (following-char)))) (shr-char-kinsoku-eol-p (following-char))))
(backward-char 1)) (backward-char 1))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment