Add test to see if gcmh-mode is enabled
This commit is contained in:
parent
a49fda9c79
commit
7fb78d41eb
1 changed files with 9 additions and 0 deletions
|
@ -36,6 +36,15 @@
|
||||||
[[ "$output" == *"t" ]]
|
[[ "$output" == *"t" ]]
|
||||||
}
|
}
|
||||||
|
|
||||||
|
@test "Starting Emacs enables gcmh-mode" {
|
||||||
|
run emacs -batch -l package -f package-initialize \
|
||||||
|
-eval "(prin1 (bound-and-true-p gcmh-mode))"
|
||||||
|
|
||||||
|
echo "$output"
|
||||||
|
|
||||||
|
[[ "$output" == *"t" ]]
|
||||||
|
}
|
||||||
|
|
||||||
@test "Starting Emacs diminishes ws-butler-global-mode" {
|
@test "Starting Emacs diminishes ws-butler-global-mode" {
|
||||||
run emacs -batch -l package -f package-initialize -l subr-x \
|
run emacs -batch -l package -f package-initialize -l subr-x \
|
||||||
-eval "(prin1 (string-empty-p (car (alist-get 'ws-butler-mode minor-mode-alist))))"
|
-eval "(prin1 (string-empty-p (car (alist-get 'ws-butler-mode minor-mode-alist))))"
|
||||||
|
|
Loading…
Reference in a new issue