summaryrefslogtreecommitdiff
path: root/lisp/electric.el
diff options
context:
space:
mode:
authorPhilipp Stephani <phst@google.com>2017-12-31 17:43:43 +0100
committerPhilipp Stephani <phst@google.com>2018-01-07 13:52:59 +0100
commit6735df4443fe0aa60862a95c38746edf2b053862 (patch)
tree759392dc48f2ce4c60ba7eaa1476c2334a51f331 /lisp/electric.el
parentf07c325d1f49e4b722f76aa730ac5d084bd0e77a (diff)
downloademacs-6735df4443fe0aa60862a95c38746edf2b053862.tar.gz
Ignore escape characters for context-sensitive quotes (Bug#29812)
* lisp/electric.el (electric-quote-post-self-insert-function): Skip over escape characters when determining whether a context-sensitive quote should be opening or closing. * test/lisp/electric-tests.el (electric-quote-replace-double-escaped-open) (electric-quote-replace-double-escaped-close): New unit tests.
Diffstat (limited to 'lisp/electric.el')
-rw-r--r--lisp/electric.el1
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/electric.el b/lisp/electric.el
index 8343d8c1b13..c00e7c00a59 100644
--- a/lisp/electric.el
+++ b/lisp/electric.el
@@ -505,6 +505,7 @@ This requotes when a quoting key is typed."
(eq last-command-event ?\")))
(save-excursion
(backward-char)
+ (skip-syntax-backward "\\")
(or (bobp) (bolp)
(memq (char-before) (list q< q<<))
(memq (char-syntax (char-before))