From 6852a7307a6f3a70d32b44d4971f98a343a64c59 Mon Sep 17 00:00:00 2001 From: Case Duckworth Date: Tue, 18 Jan 2022 18:16:01 -0600 Subject: Ahh --- init.el | 22 ++++++++++++---------- 1 file changed, 12 insertions(+), 10 deletions(-) (limited to 'init.el') diff --git a/init.el b/init.el index e03e28f..0011380 100644 --- a/init.el +++ b/init.el @@ -490,14 +490,14 @@ "|" "DONE(d!)") (sequence "|" "CANCELED(k!)") (sequence "MEETING(m)"))) - (setf (alist-get "\\.x?html?\\'" org-file-apps nil nil #'equal) - #'+org-open-html) (:bind "RET" #'+org-return-dwim "" #'+org-table-copy-down "C-c C-l" #'+org-insert-link-dwim "C-c C-n" #'+org-next-heading-widen "C-c C-p" #'+org-previous-heading-widen - "C-c C-o" #'+org-open-at-point-dwim) + "C-c C-o" #'+org-open-at-point-dwim + "`" #'+org-insert-tilde + "~" #'+org-insert-backtick) (:local-hook user-save-hook #'+org-before-save@prettify-buffer) (advice-add #'org-delete-backward-char :override #'+org-delete-backward-char) ;; (define-advice org-open-at-point (:around (fn &rest r) open-external) @@ -506,7 +506,9 @@ ;; (apply fn r))) (with-eval-after-load 'org (org-clock-persistence-insinuate) - (org-link-set-parameters "tel" :follow #'+org-tel-open)) + (org-link-set-parameters "tel" :follow #'+org-tel-open) + (setf (alist-get "\\.x?html?\\'" org-file-apps nil nil #'equal) + #'+org-open-html)) ;; Extra keywords (font-lock-add-keywords 'org-mode @@ -514,12 +516,12 @@ ("^ *\\([-]\\) " (0 (compose-region (match-beginning 1) (match-end 1) "•"))) ("^ *\\([+]\\) " - (0 (compose-region (match-beginning 1) (match-end 1) "◦")))) - (with-eval-after-load 'form-feed - ;; Horizontal lines - (font-lock-add-keywords - 'org-mode - '(("^-----+" 0 'form-feed--font-lock-face t)))))) + (0 (compose-region (match-beginning 1) (match-end 1) "◦"))))) + (with-eval-after-load 'form-feed + ;; Horizontal lines + (font-lock-add-keywords + 'org-mode + '(("^-----+" . form-feed--font-lock-face))))) (setup org-agenda (:option org-agenda-skip-deadline-if-done t -- cgit 1.4.1-21-gabe81