From eee491757a49e1494a4df549b5954612c4c194e1 Mon Sep 17 00:00:00 2001 From: Lars Magne Ingebrigtsen Date: Sun, 3 Oct 2010 23:42:26 +0200 Subject: [PATCH 1/1] (shr-ensure-paragraph): Actually work. --- lisp/ChangeLog | 1 + lisp/shr.el | 2 +- 2 files changed, 2 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index d60b0c279..5f6ec897e 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,6 +1,7 @@ 2010-10-03 Lars Magne Ingebrigtsen * shr.el: Add headings. + (shr-ensure-paragraph): Actually work. 2010-10-03 Julien Danjou diff --git a/lisp/shr.el b/lisp/shr.el index 3b9596a6e..9580b4f60 100644 --- a/lisp/shr.el +++ b/lisp/shr.el @@ -98,7 +98,7 @@ fit these criteria." (defun shr-ensure-paragraph () (unless (bobp) (if (bolp) - (unless (eql (char-after (1- (point))) ?\n) + (unless (eql (char-after (- (point) 2)) ?\n) (insert "\n")) (insert "\n\n")))) -- 2.25.1