nit(org): remove unused doom-source link type

A vestigial link type that snuck in during my tinkering, but was never
used, and has been replaced in some unpublished work.
This commit is contained in:
Henrik Lissner 2023-02-23 20:45:03 -05:00
parent f348856cd3
commit 4651df6530
No known key found for this signature in database
GPG key ID: B60957CA074D39A3

View file

@ -615,21 +615,6 @@ relative to `org-directory', unless it is an absolute path."
(string-remove-prefix
"@" (+org-link-read-desc-at-point link)))))
:face (lambda (_) 'org-priority))
(org-link-set-parameters
"doom-source"
:follow (lambda (link)
(user-error "-- %S %S %S" source url link)
(cl-destructuring-bind (source . url)
(save-match-data
(and (string-match "^\\([^:]+\\):\\(.+\\)$" link)
(cons (match-string 1) (match-string 2))))
(pcase source
("doom"
(org-link-open (expand-file-name url doom-modules-dir)))
("contrib"
(browse-url (format "https://docs.doomemacs.org/modules/"
(replace-regexp-in-string "::\\(.+\\)$" "#\\1" url))))
(_ (user-error "%s is not a valid module source" source))))))
(org-link-set-parameters
"doom-changelog"
:follow (lambda (link)