scip/autoscratch
1
0
Fork 0
mirror of https://codeberg.org/scip/autoscratch.git synced 2025-12-16 20:10:57 +01:00
Code Issues Packages Projects Releases Wiki Activity

more tests

Browse Source
This commit is contained in:
Thomas von Dein
2017-07-19 11:25:57 +02:00
parent f1f278e844
commit 704207e307
1 changed files with 8 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

9
test/autoscratch-mode-tests.el
View File

@@ -33,10 +33,17 @@
(require 'ert) (require 'ert)
(ert-deftest switch-text () (ert-deftest switch-text ()
;; start with empty *scratch*
(autoscratch-buffer) (autoscratch-buffer)
(should (string= major-mode "autoscratch-mode"))
;; should rename current scratch, create a new scratch in the
;; background and enable the correct mode
(insert "t") (insert "t")
(autoscratch--look-for-triggers nil) (autoscratch--look-for-triggers nil)
(should (string= major-mode "text-mode"))) (should (string= major-mode "text-mode"))
;; now we should be back to the previously "forked" scratch
(kill-buffer)
(should (string= major-mode "autoscratch-mode")))
(provide 'trigger-tests) (provide 'trigger-tests)