mirror of
git://git.sv.gnu.org/emacs.git
synced 2025-12-23 14:10:28 -08:00
Add electric-quote-string unit test
* test/automated/electric-tests.el (electric-quote-string): New test.
This commit is contained in:
parent
628053101d
commit
8f36614512
1 changed files with 8 additions and 0 deletions
|
|
@ -584,5 +584,13 @@ baz\"\""
|
||||||
(skip-chars-backward "\"")
|
(skip-chars-backward "\"")
|
||||||
(mark-sexp -1)))
|
(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)
|
(provide 'electric-tests)
|
||||||
;;; electric-tests.el ends here
|
;;; electric-tests.el ends here
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue