awesome-emacs/doomemacs
1
0
Fork 0
mirror of https://github.com/doomemacs/doomemacs synced 2025-08-03 12:27:26 -05:00
Code Issues Packages Projects Releases Wiki Activity

feature/services: -when-let => when-let*

Browse Source
This commit is contained in:
Henrik Lissner
2018-01-08 15:25:28 -05:00
parent 3beb1f098a
commit 971e4904fe
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
modules/feature/services/autoload.el
View File

@ -12,7 +12,7 @@
"Delete service at point. Asks for confirmation." "Delete service at point. Asks for confirmation."
(interactive "P") (interactive "P")
(prodigy-with-refresh (prodigy-with-refresh
(-when-let (service (prodigy-service-at-pos)) (when-let* ((service (prodigy-service-at-pos)))
(let ((name (plist-get service :name))) (let ((name (plist-get service :name)))
(cond ((or arg (cond ((or arg
(y-or-n-p (format "Delete '%s' service?" name))) (y-or-n-p (format "Delete '%s' service?" name)))