aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorJoão Távora2013-12-28 19:26:54 +0000
committerJoão Távora2013-12-28 19:26:54 +0000
commite9d6c46ab556fc08101b51dc11d82e2a1f0a42c4 (patch)
treef7edccae1f3c30986bddbc3b0a998f6819a98b4f
parent8962d4b30037c223af0026707fa35c9cf85c7e57 (diff)
downloademacs-e9d6c46ab556fc08101b51dc11d82e2a1f0a42c4.tar.gz
emacs-e9d6c46ab556fc08101b51dc11d82e2a1f0a42c4.zip
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.
-rw-r--r--lisp/ChangeLog5
-rw-r--r--lisp/elec-pair.el2
2 files changed, 6 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 3c9356fbd7c..910d35afc4b 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
12013-12-28 João Távora <joaotavora@gmail.com>
2
3 * elec-pair.el (electric-pair-post-self-insert-function): Don't
4 open extra newlines at beginning of buffer. (Bug#16272)
5
12013-12-28 Eli Zaretskii <eliz@gnu.org> 62013-12-28 Eli Zaretskii <eliz@gnu.org>
2 7
3 * frame.el (window-system-for-display): Don't allow to create a 8 * 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."
513 (funcall electric-pair-open-newline-between-pairs) 513 (funcall electric-pair-open-newline-between-pairs)
514 electric-pair-open-newline-between-pairs) 514 electric-pair-open-newline-between-pairs)
515 (eq last-command-event ?\n) 515 (eq last-command-event ?\n)
516 (not (eobp)) 516 (< (1+ (point-min)) (point) (point-max))
517 (eq (save-excursion 517 (eq (save-excursion
518 (skip-chars-backward "\t\s") 518 (skip-chars-backward "\t\s")
519 (char-before (1- (point)))) 519 (char-before (1- (point))))