1 files changed, 12 insertions, 8 deletions

@@ -495,7 +495,9 @@
          "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 +508,9 @@
     (setf (alist-get "\\.x?html?\\'" org-file-apps nil nil #'equal)
           #'+org-open-html)
     (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 +518,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