1
0
Fork 0

Diminish org-edna

This commit is contained in:
Tom Willemse 2020-04-09 11:32:52 -07:00
parent 8a494dc120
commit afaa9d2a87
3 changed files with 43 additions and 2 deletions

View file

@ -332,6 +332,13 @@ integration-test-oni-json:
- package - package
script: make integration-test-oni-json TEST_ARCHIVE=$(realpath bin/) script: make integration-test-oni-json TEST_ARCHIVE=$(realpath bin/)
integration-test-oni-org:
stage: integration-test
image: registry.gitlab.com/ryuslash/emacs-config
dependencies:
- package
script: make integration-test-oni-org TEST_ARCHIVE=$(realpath bin/)
integration-test-oni-paredit: integration-test-oni-paredit:
stage: integration-test stage: integration-test
image: registry.gitlab.com/ryuslash/emacs-config image: registry.gitlab.com/ryuslash/emacs-config

View file

@ -4,8 +4,8 @@
;; Author: Tom Willemse <tom@ryuslash.org> ;; Author: Tom Willemse <tom@ryuslash.org>
;; Keywords: local ;; Keywords: local
;; Version: 2020.0408.205648 ;; Version: 2020.0409.113204
;; Package-Requires: (oni-yasnippet oni-alert oni-hydra org-plus-contrib org-bullets org-edna) ;; Package-Requires: (oni-yasnippet oni-alert oni-hydra org-plus-contrib org-bullets org-edna 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
@ -26,6 +26,7 @@
;;; Code: ;;; Code:
(require 'diminish)
(require 'hydra) (require 'hydra)
(require 'ob) (require 'ob)
(require 'ol-man) (require 'ol-man)
@ -307,6 +308,8 @@ _l_: Store link ^^ _j_: Journal entry
(with-eval-after-load 'yasnippet (with-eval-after-load 'yasnippet
(oni-org-snippets-initialize))) (oni-org-snippets-initialize)))
(with-eval-after-load 'org-edna (diminish 'org-edna-mode))
;;;###autoload(with-eval-after-load 'org (require 'oni-org)) ;;;###autoload(with-eval-after-load 'org (require 'oni-org))
(provide 'oni-org) (provide 'oni-org)

View file

@ -0,0 +1,31 @@
#!/usr/bin/env bats
@test "Opening a .org file loads oni-org" {
run emacs -batch -l package -f package-initialize \
-visit test.org \
-eval "(prin1 (featurep 'oni-org))"
echo "$output"
[[ "$output" == *"t" ]]
}
@test "Loading org-edna diminishes org-edna-mode" {
run emacs -batch -l package -f package-initialize -l subr-x \
-l org-edna \
-eval "(prin1 (string-empty-p (car (alist-get 'org-edna-mode minor-mode-alist))))"
echo "$output"
[[ "$output" == *"t" ]]
}
@test "Reloading org-edna diminishes org-edna-mode" {
run emacs -batch -l package -f package-initialize -l subr-x \
-l org-edna \
-eval "(prin1 (string-empty-p (car (alist-get 'org-edna-mode minor-mode-alist))))"
echo "$output"
[[ "$output" == *"t" ]]
}