Commit fe98a42f authored by Katsumi Yamaoka's avatar Katsumi Yamaoka
Browse files

shr.el (shr-insert): Fix last change.

parent b3e22bd4
......@@ -240,11 +240,10 @@ redirects somewhere else."
(progn
(setq found (shr-find-fill-point))
(not (eolp))))
(unless (prog1
found
(when (eq (preceding-char) ? )
(delete-char -1))
(insert "\n"))
(when (eq (preceding-char) ? )
(delete-char -1))
(insert "\n")
(unless found
(put-text-property (1- (point)) (point) 'shr-break t)
;; No space is needed at the beginning of a line.
(when (eq (following-char) ? )
......
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