diff --git a/site-lisp/db-org.el b/site-lisp/db-org.el index bd5736a..0bbd62e 100644 --- a/site-lisp/db-org.el +++ b/site-lisp/db-org.el @@ -68,29 +68,8 @@ (setq org-columns-default-format "%80ITEM(Task) %10Effort(Effort){:} %10CLOCKSUM") -(setq org-structure-template-alist - '(("s" "#+begin_src ?\n\n#+end_src" "\n\n") - ("e" "#+begin_example\n?\n#+end_example" "\n?\n") - ("q" "#+begin_quote\n?\n#+end_quote" "\n?\n") - ("Q" "#+begin_equation\n?\n#+end_equation" - "\n?\n") - ("v" "#+begin_verse\n?\n#+end_verse" "\n?\n") - ("V" "#+begin_verbatim\n?\n#+end_verbatim" "\n?\n") - ("c" "#+begin_center\n?\n#+end_center" "
\n?\n
") - ("l" "#+begin_latex\n?\n#+end_latex" - "\n?\n") - ("l" "#+latex: " "?") - ("h" "#+begin_html\n?\n#+end_html" - "\n?\n") - ("h" "#+html: " "?") - ("a" "#+begin_ascii\n?\n#+end_ascii" "") - ("a" "#+ascii: " "") - ("i" "#+index: ?" "#+index: ?") - ("i" "#+include: %file ?" - ""))) - -;;; How to open files and links +;;; How to open files ;; open directory links in emacs itself (add-to-list 'org-file-apps '(directory . emacs)) @@ -103,13 +82,6 @@ (when (eq system-type 'cygwin) (add-to-list 'org-file-apps '(t . "cygstart %s") t)) -(when (eq system-type 'windows-nt) - (org-link-set-parameters "onenote" :follow #'db/org-onenote-open) - - (defun db/org-onenote-open (path) - "Visit OneNote document on PATH." - (start-process "OneNote" nil "OneNote" "/hyperlink" path))) - ;;; Faces