From: Philipp Stephani <phst@google.com>
Date: Mon, 2 May 2016 15:57:30 +0000 (-0700)
Subject: Add electric-quote-string unit test
X-Git-Tag: emacs-25.0.94~49
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=8f36614;p=emacs.git

Add electric-quote-string unit test

* test/automated/electric-tests.el (electric-quote-string): New test.
---

diff --git a/test/automated/electric-tests.el b/test/automated/electric-tests.el
index 107b2e79fb6..afd707667b8 100644
--- a/test/automated/electric-tests.el
+++ b/test/automated/electric-tests.el
@@ -584,5 +584,13 @@ baz\"\""
                   (skip-chars-backward "\"")
                   (mark-sexp -1)))
 
+
+;;; Electric quotes
+(define-electric-pair-test electric-quote-string
+  "" "'" :expected-string "'" :expected-point 2
+  :fixture-fn #'electric-quote-local-mode
+  :bindings '((electric-quote-string . t))
+  :test-in-comments nil :test-in-strings nil)
+
 (provide 'electric-tests)
 ;;; electric-tests.el ends here