#!/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" ]]
}