Add org-ctags-disable' function to undo calling
org-ctags-enable'
This commit is contained in:
parent
f940a92572
commit
afa5e0470c
42
README.org
42
README.org
@ -181,9 +181,6 @@ Try to load [[https://github.com/emacscollective/no-littering][no-littering]] as
|
|||||||
|
|
||||||
(require 'no-littering nil 'noerror)
|
(require 'no-littering nil 'noerror)
|
||||||
|
|
||||||
;; Else: Add `(tags-file-name nil)' to outermost `let*' in `org-return'.
|
|
||||||
(setq org-modules nil)
|
|
||||||
|
|
||||||
(provide 'early-init)
|
(provide 'early-init)
|
||||||
;; Emacs looks for "Local variables:" after the last "?\n?\f".
|
;; Emacs looks for "Local variables:" after the last "?\n?\f".
|
||||||
|
|
||||||
@ -2283,8 +2280,8 @@ of the [[info:org#Top][Org (info)]] manual.
|
|||||||
I have split the initial [[https://orgmode.org/][Org-mode]] setup over several listings. Here, follows a
|
I have split the initial [[https://orgmode.org/][Org-mode]] setup over several listings. Here, follows a
|
||||||
list detailing and motivating each listing:
|
list detailing and motivating each listing:
|
||||||
1. Listing [[lst:set-org-options]] handles basic [[https://orgmode.org/][Org-mode]] options.
|
1. Listing [[lst:set-org-options]] handles basic [[https://orgmode.org/][Org-mode]] options.
|
||||||
2. Listing [[lst:kill-org-ctags]] tries to disable ~org-ctags~ functionality without
|
2. Listing [[lst:undo-org-ctags]] undoes ~org-ctags~. See [[https://list.orgmode.org/87mt43agk6.fsf@localhost/][org-ctags land grab]] for
|
||||||
side-effects.
|
more information.
|
||||||
3. Listing [[lst:setup-org-babel]] sets ~ob-core~, ~ob-latex~, and ~ob-lisp~ options.
|
3. Listing [[lst:setup-org-babel]] sets ~ob-core~, ~ob-latex~, and ~ob-lisp~ options.
|
||||||
See [[info:org#Working with Source Code][working with source code (info)]] for Org Babel information.
|
See [[info:org#Working with Source Code][working with source code (info)]] for Org Babel information.
|
||||||
4. Listing [[lst:fake-org-babel-functions]] adds =org-babel-execute:<LANGUAGE>=
|
4. Listing [[lst:fake-org-babel-functions]] adds =org-babel-execute:<LANGUAGE>=
|
||||||
@ -2350,9 +2347,6 @@ list detailing and motivating each listing:
|
|||||||
("\\.mm\\'" . default)
|
("\\.mm\\'" . default)
|
||||||
("\\.x?html?\\'" . default)
|
("\\.x?html?\\'" . default)
|
||||||
("\\.pdf\\'" . emacs))
|
("\\.pdf\\'" . emacs))
|
||||||
;; Up to here `org-modules' is nil thanks to my `early-init.el'.
|
|
||||||
;; If not `org-ctags' gets loaded, which does not work on my system
|
|
||||||
;; and confuses `org-return'.
|
|
||||||
org-modules '(ol-bibtex
|
org-modules '(ol-bibtex
|
||||||
ol-doi
|
ol-doi
|
||||||
ol-eww
|
ol-eww
|
||||||
@ -2363,15 +2357,33 @@ list detailing and motivating each listing:
|
|||||||
org-use-property-inheritance t))
|
org-use-property-inheritance t))
|
||||||
#+end_src
|
#+end_src
|
||||||
|
|
||||||
#+caption[Kill =org-ctags=]:
|
#+caption[Undo calling =org-ctags-enable= ]:
|
||||||
#+caption: Kill =org-ctags=.
|
#+caption: Undo calling =org-ctags-enable=.
|
||||||
#+name: lst:kill-org-ctags
|
#+name: lst:undo-org-ctags
|
||||||
#+begin_src emacs-lisp -n :results silent
|
#+begin_src emacs-lisp -n :results silent
|
||||||
(with-eval-after-load 'org-ctags
|
(with-eval-after-load 'org-ctags
|
||||||
;; This is not enough, since `org-execute-file-search-in-bibtex'
|
;; See also `org-link-search-must-match-exact-headline' for link searches.
|
||||||
;; may be a member of `org-execute-file-search-function'.
|
;; Undo calling `org-ctags-enable'. For what may cause `org-ctags'
|
||||||
;; Does this trigger `org-ctags'? Why? How to fix this?
|
;; loading, see: https://list.orgmode.org/87mt43agk6.fsf@localhost/
|
||||||
(setq org-execute-file-search-functions nil))
|
(defun org-ctags-disable ()
|
||||||
|
"Undo calling `org-ctags-enable'."
|
||||||
|
(put 'org-mode 'find-tag-default-function nil)
|
||||||
|
(setq org-ctags-enabled-p nil)
|
||||||
|
;; Use the `:options' list from the `org-ctags-open-link-functions' code.
|
||||||
|
(let ((options '(org-ctags-find-tag
|
||||||
|
org-ctags-ask-rebuild-tags-file-then-find-tag
|
||||||
|
org-ctags-rebuild-tags-file-then-find-tag
|
||||||
|
org-ctags-ask-append-topic
|
||||||
|
org-ctags-append-topic
|
||||||
|
org-ctags-ask-visit-buffer-or-file
|
||||||
|
org-ctags-visit-buffer-or-file
|
||||||
|
org-ctags-fail-silently))
|
||||||
|
(fns org-open-link-functions))
|
||||||
|
(dolist (fn options)
|
||||||
|
(setq fns (delq fn fns)))
|
||||||
|
;; Reset `org-open-link-functions' after removal of prepended functions.
|
||||||
|
(setq org-open-link-functions fns)))
|
||||||
|
(org-ctags-disable))
|
||||||
#+end_src
|
#+end_src
|
||||||
|
|
||||||
#+caption[Set =org-babel= options]:
|
#+caption[Set =org-babel= options]:
|
||||||
|
Loading…
x
Reference in New Issue
Block a user