From e9d6c46ab556fc08101b51dc11d82e2a1f0a42c4 Mon Sep 17 00:00:00 2001 From: =?utf8?q?Jo=C3=A3o=20T=C3=A1vora?= Date: Sat, 28 Dec 2013 19:26:54 +0000 Subject: [PATCH] Fix bug #16272 when inserting newline at point-min in electric-pair-mode. * elec-pair.el (electric-pair-post-self-insert-function): Don't open extra newlines at beginning of buffer. --- lisp/ChangeLog | 5 +++++ lisp/elec-pair.el | 2 +- 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 3c9356fbd7c..910d35afc4b 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2013-12-28 João Távora + + * elec-pair.el (electric-pair-post-self-insert-function): Don't + open extra newlines at beginning of buffer. (Bug#16272) + 2013-12-28 Eli Zaretskii * frame.el (window-system-for-display): Don't allow to create a diff --git a/lisp/elec-pair.el b/lisp/elec-pair.el index 1691fbbfec3..729132651db 100644 --- a/lisp/elec-pair.el +++ b/lisp/elec-pair.el @@ -513,7 +513,7 @@ happened." (funcall electric-pair-open-newline-between-pairs) electric-pair-open-newline-between-pairs) (eq last-command-event ?\n) - (not (eobp)) + (< (1+ (point-min)) (point) (point-max)) (eq (save-excursion (skip-chars-backward "\t\s") (char-before (1- (point)))) -- 2.39.2