[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
bug#19505: 25.0.50; Defining a chomp function breaks electric pairing
From: |
Tom Willemse |
Subject: |
bug#19505: 25.0.50; Defining a chomp function breaks electric pairing |
Date: |
Sun, 04 Jan 2015 15:53:03 +0100 |
The attached patch fixes the situation where a function `chomp' exists
and `electric-pair-skip-whitespace' has the value `chomp'. Since that
specific symbol is mentioned as a special case for this variable, it
seems that it shouldn't try to call a function named as such.
Basically, defining a function named `chomp' will break electric pairing
if the `electric-pair-skip-whitespace' is set to chomp.
>From d7e6e8f2ff3572afb4131ea64966b2a9253f9ac6 Mon Sep 17 00:00:00 2001
From: Tom Willemse <tom@ryuslash.org>
Date: Sun, 4 Jan 2015 05:37:02 +0100
Subject: [PATCH] Always treat chomp as a symbol
---
lisp/ChangeLog | 5 +++++
lisp/elec-pair.el | 3 ++-
2 files changed, 7 insertions(+), 1 deletion(-)
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index aa79a8d..b031f25 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2015-01-04 Tom Willemse <tom@ryuslash.org>
+
+ * elec-pair.el (electric-pair-post-self-insert-function): Make
+ sure chomp isn't used as a function.
+
2015-01-04 Paul Eggert <eggert@cs.ucla.edu>
Less 'make' chatter for lisp dir
diff --git a/lisp/elec-pair.el b/lisp/elec-pair.el
index 2cede62..65c3dbf 100644
--- a/lisp/elec-pair.el
+++ b/lisp/elec-pair.el
@@ -475,7 +475,8 @@ (defun electric-pair-post-self-insert-function
(when (and (not (and unconditional
(eq syntax ?\")))
(setq skip-whitespace-info
- (if (functionp
electric-pair-skip-whitespace)
+ (if (and (not (eq
electric-pair-skip-whitespace 'chomp))
+ (functionp
electric-pair-skip-whitespace))
(funcall
electric-pair-skip-whitespace)
electric-pair-skip-whitespace)))
(electric-pair--skip-whitespace))
--
2.2.1
- bug#19505: 25.0.50; Defining a chomp function breaks electric pairing,
Tom Willemse <=