Update 17 drones and commit a bunch of changes

[~bandali/configs] / lisp / bandali-org.el

diff --git a/lisp/bandali-org.el b/lisp/bandali-org.el
index 957417f..a9ab750 100644 (file)
--- a/lisp/bandali-org.el
+++ b/lisp/bandali-org.el
@@ -1,3 +1,29 @@
+;;; bandali-org.el --- bandali's Org setup           -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2018-2020  Amin Bandali
+
+;; Author: Amin Bandali <bandali@gnu.org>
+;; Keywords: calendar, data, docs, hypermedia, outlines
+
+;; 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
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; My set up for Org (org-mode) and all things Org.
+
+;;; Code:
+
 (use-package org
   :config
   (setq org-src-tab-acts-natively t
@@ -9,9 +35,6 @@
         org-startup-folded 'content
         org-catch-invisible-edits 'show-and-error
         org-log-done 'time)
-  (when (version< org-version "9.3")
-    (setq org-email-link-description-format
-          org-link-email-description-format))
   (add-to-list 'org-structure-template-alist '("L" . "src emacs-lisp") t)
   (add-to-list 'org-modules 'org-habit)
   :bind
@@ -54,6 +77,7 @@
 
 (use-package ox-extra
   :config
+  (declare-function ox-extras-activate "ox-extra" (extras))
   (ox-extras-activate '(latex-header-blocks ignore-headlines)))
 
 ;; asynchronous tangle, using emacs-async to asynchronously tangle an
@@ -73,7 +97,8 @@
            (file (buffer-file-name))
            (file-nodir (file-name-nondirectory file))
            ;; (async-quiet-switch "-q")
-           (file-noext (file-name-sans-extension file)))
+           ;; (file-noext (file-name-sans-extension file))
+           )
       (async-start
        `(lambda ()
           (require 'org)
@@ -94,4 +119,8 @@
  'safe-local-variable-values
  '(eval add-hook 'after-save-hook #'b/async-babel-tangle 'append 'local))
 
+(use-package org-tanglesync
+  :hook (org-mode . org-tanglesync-mode))
+
 (provide 'bandali-org)
+;;; bandali-org.el ends here