diff --git a/lisp/mitch-packages.el b/lisp/mitch-packages.el index 74c1a71..2cb0e7e 100644 --- a/lisp/mitch-packages.el +++ b/lisp/mitch-packages.el @@ -1243,26 +1243,27 @@ Taken from https://howardism.org/Technical/Emacs/eshell-why.html" :after #'mitch/org-grayify-stars) ) -(use-package svg-tag-mode - :elpaca (svg-tag-mode - :host github - :repo "rougier/svg-tag-mode") - ;; :after org-modern - :hook (org-modern-mode . svg-tag-mode) - :custom (svg-tag-tags - `((,(rx blank (group (= 4 upper)) blank) . - ((lambda (tag) - (svg-tag-make tag - :inverse t - :face (intern - (format "org-%s" (downcase tag))))))) - (,(rx (group "#+" (or "begin" "end") "_src")) . - ((lambda (tag) - (let* ((begend (string-trim tag "#\\+" "_src")) - (upcased (upcase begend))) - (svg-tag-make upcased - :face 'org-block-begin-line))))))) - ) +;; svg-tags; disabled because reasons +;; (use-package svg-tag-mode +;; :elpaca (svg-tag-mode +;; :host github +;; :repo "rougier/svg-tag-mode") +;; ;; :after org-modern +;; :hook (org-modern-mode . svg-tag-mode) +;; :custom (svg-tag-tags +;; `((,(rx blank (group (= 4 upper)) blank) . +;; ((lambda (tag) +;; (svg-tag-make tag +;; :inverse t +;; :face (intern +;; (format "org-%s" (downcase tag))))))) +;; (,(rx (group "#+" (or "begin" "end") "_src")) . +;; ((lambda (tag) +;; (let* ((begend (string-trim tag "#\\+" "_src")) +;; (upcased (upcase begend))) +;; (svg-tag-make upcased +;; :face 'org-block-begin-line))))))) +;; ) (use-package haskell-mode) (use-package yuck-mode)