emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[nongnu] elpa/toc-org ebff38bfa4 094/128: make toc-org a minor mode (#61


From: ELPA Syncer
Subject: [nongnu] elpa/toc-org ebff38bfa4 094/128: make toc-org a minor mode (#61)
Date: Sun, 2 Jan 2022 09:59:12 -0500 (EST)

branch: elpa/toc-org
commit ebff38bfa4cc95476a20a349014e2d1862ff4647
Author: Sergei Nosov <sergei.nosov@gmail.com>
Commit: GitHub <noreply@github.com>

    make toc-org a minor mode (#61)
    
    * make toc-org a minor mode
    
    fixes #60
---
 README.org |  2 +-
 toc-org.el | 11 +++++++++++
 2 files changed, 12 insertions(+), 1 deletion(-)

diff --git a/README.org b/README.org
index 40934e3848..b510c48a70 100644
--- a/README.org
+++ b/README.org
@@ -36,7 +36,7 @@ repository and then put the following snippet in your 
~/.emacs file
 
 #+BEGIN_SRC elisp
   (if (require 'toc-org nil t)
-      (add-hook 'org-mode-hook 'toc-org-enable)
+      (add-hook 'org-mode-hook 'toc-org-mode)
     (warn "toc-org not found"))
 #+END_SRC
 
diff --git a/toc-org.el b/toc-org.el
index 63a35f7db2..ce1cf322aa 100644
--- a/toc-org.el
+++ b/toc-org.el
@@ -412,6 +412,17 @@ not :noexport_#:."
     (setq org-link-translation-function 'toc-org-unhrefify)
     (toc-org-insert-toc t)))
 
+;;;###autoload
+(define-minor-mode toc-org-mode
+  "Toggle `toc-org' in this buffer."
+  :group toc-org
+  (if toc-org-mode
+      (toc-org-enable)
+    (remove-hook 'before-save-hook 'toc-org-insert-toc t)
+    ;; we would've set `org-link-translation-function' only if it's been nil
+    (when (equal org-link-translation-function 'toc-org-unhrefify)
+      (setq org-link-translation-function nil))))
+
 ;; Local Variables:
 ;; compile-command: "emacs -batch -l ert -l toc-org.el -l toc-org-test.el -f 
ert-run-tests-batch-and-exit && emacs -batch -f batch-byte-compile toc-org.el 
2>&1 | sed -n '/Warning\|Error/p' | xargs -r ls"
 ;; End:



reply via email to

[Prev in Thread] Current Thread [Next in Thread]