diff options
author | João Távora <[email protected]> | 2014-04-02 10:59:06 +0100 |
---|---|---|
committer | João Távora <[email protected]> | 2014-04-02 10:59:06 +0100 |
commit | 200c532bd04a67a89db602462d74706051c61178 (patch) | |
tree | ef02bee0c2b5aa0d8e9adc407d24a7e20a97b96a /test | |
parent | 2395f2b919f44cae22b2ca99cd779e69d79f710a (diff) |
Inhibit quote autopairing more frequently
* lisp/elec-pair.el (electric-pair-inhibit-if-helps-balance): Inhibit
quote pairing if point-max is inside an unterminated string.
(electric-pair--looking-at-unterminated-string-p):
Delete.
(electric-pair--in-unterminated-string-p): New function.
* test/automated/electric-tests.el (inhibit-if-strings-mismatched):
New test, change from `inhibit-only-of-next-is-mismatched'.
Diffstat (limited to 'test')
-rw-r--r-- | test/ChangeLog | 5 | ||||
-rw-r--r-- | test/automated/electric-tests.el | 4 |
2 files changed, 7 insertions, 2 deletions
diff --git a/test/ChangeLog b/test/ChangeLog index 75a3d0101c..be845db162 100644 --- a/test/ChangeLog +++ b/test/ChangeLog @@ -1,3 +1,8 @@ +2014-04-02 João Távora <[email protected]> + + * automated/electric-tests.el (inhibit-if-strings-mismatched): + New test, change from `inhibit-only-of-next-is-mismatched'. + 2014-03-26 Barry O'Reilly <[email protected]> * automated/undo-tests.el (undo-test-marker-adjustment-nominal): diff --git a/test/automated/electric-tests.el b/test/automated/electric-tests.el index e3ffd1abd2..c43b87f3f8 100644 --- a/test/automated/electric-tests.el +++ b/test/automated/electric-tests.el @@ -295,9 +295,9 @@ Should %s \"%s\" and point at %d" :bindings `((electric-pair-text-syntax-table . ,prog-mode-syntax-table))) -(define-electric-pair-test inhibit-only-if-next-is-mismatched +(define-electric-pair-test inhibit-if-strings-mismatched "\"foo\"\"bar" "\"" - :expected-string "\"\"\"foo\"\"bar" + :expected-string "\"\"foo\"\"bar" :expected-point 2 :test-in-strings nil :bindings `((electric-pair-text-syntax-table |