Inherit from pre-existing recipe when updating :pin
This commit is contained in:
parent
2fd7ede0d8
commit
fee7a645c0
1 changed files with 5 additions and 2 deletions
|
@ -210,6 +210,7 @@ Grabs the latest commit id of the package using 'git'."
|
||||||
(interactive)
|
(interactive)
|
||||||
;; REVIEW Better error handling
|
;; REVIEW Better error handling
|
||||||
;; TODO Insert a new `package!' if no `package!' at poin
|
;; TODO Insert a new `package!' if no `package!' at poin
|
||||||
|
(require 'straight)
|
||||||
(ignore-errors
|
(ignore-errors
|
||||||
(while (and (atom (sexp-at-point))
|
(while (and (atom (sexp-at-point))
|
||||||
(not (bolp)))
|
(not (bolp)))
|
||||||
|
@ -223,8 +224,10 @@ Grabs the latest commit id of the package using 'git'."
|
||||||
(cdr (doom-call-process
|
(cdr (doom-call-process
|
||||||
"git" "ls-remote"
|
"git" "ls-remote"
|
||||||
(straight-vc-git--destructure
|
(straight-vc-git--destructure
|
||||||
(doom-plist-merge (plist-get (cdr recipe) :recipe)
|
(doom-plist-merge
|
||||||
(cdr (straight-recipes-retrieve name)))
|
(plist-get (cdr recipe) :recipe)
|
||||||
|
(or (cdr (straight-recipes-retrieve name))
|
||||||
|
(plist-get (cdr (assq name doom-packages)) :recipe)))
|
||||||
(upstream-repo upstream-host)
|
(upstream-repo upstream-host)
|
||||||
(straight-vc-git--encode-url upstream-repo upstream-host))))))
|
(straight-vc-git--encode-url upstream-repo upstream-host))))))
|
||||||
(unless id
|
(unless id
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue