Diminish gcmh-mode
This commit is contained in:
parent
1be166dfc7
commit
b041947902
2 changed files with 14 additions and 2 deletions
|
@ -4,8 +4,8 @@
|
||||||
|
|
||||||
;; Author: Tom Willemse <tom@ryuslash.org>
|
;; Author: Tom Willemse <tom@ryuslash.org>
|
||||||
;; Keywords: local
|
;; Keywords: local
|
||||||
;; Version: 2020.0909.084822
|
;; Version: 2020.1015.100916
|
||||||
;; Package-Requires: (oni-data-dir expand-region multiple-cursors embrace gcmh)
|
;; Package-Requires: (oni-data-dir expand-region multiple-cursors embrace gcmh diminish)
|
||||||
|
|
||||||
;; This program is free software; you can redistribute it and/or modify
|
;; This program is free software; you can redistribute it and/or modify
|
||||||
;; it under the terms of the GNU General Public License as published by
|
;; it under the terms of the GNU General Public License as published by
|
||||||
|
@ -27,6 +27,7 @@
|
||||||
|
|
||||||
;;; Code:
|
;;; Code:
|
||||||
|
|
||||||
|
(require 'diminish)
|
||||||
(require 'gcmh)
|
(require 'gcmh)
|
||||||
(require 'oni-data-dir)
|
(require 'oni-data-dir)
|
||||||
(require 'recentf)
|
(require 'recentf)
|
||||||
|
@ -153,6 +154,8 @@
|
||||||
(setq oni-core--recentf-idle-timer
|
(setq oni-core--recentf-idle-timer
|
||||||
(run-with-idle-timer 10 t #'oni-core-recentf-save-list-silently)))
|
(run-with-idle-timer 10 t #'oni-core-recentf-save-list-silently)))
|
||||||
|
|
||||||
|
(diminish 'gcmh-mode)
|
||||||
|
|
||||||
(electric-indent-mode -1)
|
(electric-indent-mode -1)
|
||||||
(winner-mode)
|
(winner-mode)
|
||||||
(recentf-mode)
|
(recentf-mode)
|
||||||
|
|
9
test/integration/oni-core.bats
Normal file → Executable file
9
test/integration/oni-core.bats
Normal file → Executable file
|
@ -26,3 +26,12 @@
|
||||||
|
|
||||||
[[ "$output" == *"oni-core-move-end-of-dwim" ]]
|
[[ "$output" == *"oni-core-move-end-of-dwim" ]]
|
||||||
}
|
}
|
||||||
|
|
||||||
|
@test "Starting Emacs diminishes gcmh-mode" {
|
||||||
|
run emacs -batch -l package -f package-initialize -l subr-x \
|
||||||
|
-eval "(prin1 (string-empty-p (car (alist-get 'gcmh-mode minor-mode-alist))))"
|
||||||
|
|
||||||
|
echo "$output"
|
||||||
|
|
||||||
|
[[ "$output" == *"t" ]]
|
||||||
|
}
|
||||||
|
|
Loading…
Reference in a new issue