49 lines
1.3 KiB
Text
49 lines
1.3 KiB
Text
|
#!/usr/bin/env bats
|
||
|
|
|
||
|
|
@test "Opening Emacs loads oni-company" {
|
||
|
|
run emacs -batch -l package -f package-initialize \
|
||
|
|
-eval "(prin1 (featurep 'oni-company))"
|
||
|
|
|
||
|
|
echo "$output"
|
||
|
|
|
||
|
|
[[ "$output" == *"t" ]]
|
||
|
|
}
|
||
|
|
|
||
|
|
@test "Opening Emacs diminishes company-mode" {
|
||
|
|
run emacs -batch -l package -f package-initialize \
|
||
|
|
-eval "(prin1 (string-empty-p (car (alist-get 'company-mode minor-mode-alist))))"
|
||
|
|
|
||
|
|
echo "$output"
|
||
|
|
|
||
|
|
[[ "$output" == *"t" ]]
|
||
|
|
}
|
||
|
|
|
||
|
|
@test "Reloading company diminishes company-mode" {
|
||
|
|
run emacs -batch -l package -f package-initialize \
|
||
|
|
-eval "(load-library \"company\")" \
|
||
|
|
-eval "(prin1 (string-empty-p (car (alist-get 'company-mode minor-mode-alist))))"
|
||
|
|
|
||
|
|
echo "$output"
|
||
|
|
|
||
|
|
[[ "$output" == *"t" ]]
|
||
|
|
}
|
||
|
|
|
||
|
|
@test "Opening Emacs diminishes company-posframe-mode" {
|
||
|
|
run emacs -batch -l package -f package-initialize \
|
||
|
|
-eval "(prin1 (string-empty-p (car (alist-get 'company-posframe-mode minor-mode-alist))))"
|
||
|
|
|
||
|
|
echo "$output"
|
||
|
|
|
||
|
|
[[ "$output" == *"t" ]]
|
||
|
|
}
|
||
|
|
|
||
|
|
@test "Reloading company-posframe diminishes company-posframe-mode" {
|
||
|
|
run emacs -batch -l package -f package-initialize \
|
||
|
|
-eval "(load-library \"company-posframe\")" \
|
||
|
|
-eval "(prin1 (string-empty-p (car (alist-get 'company-posframe-mode minor-mode-alist))))"
|
||
|
|
|
||
|
|
echo "$output"
|
||
|
|
|
||
|
|
[[ "$output" == *"t" ]]
|
||
|
|
}
|