summaryrefslogtreecommitdiffhomepage
path: root/custom/jao-custom-x11.el
diff options
context:
space:
mode:
Diffstat (limited to 'custom/jao-custom-x11.el')
-rw-r--r--custom/jao-custom-x11.el10
1 files changed, 5 insertions, 5 deletions
diff --git a/custom/jao-custom-x11.el b/custom/jao-custom-x11.el
index 3311668..6f0a607 100644
--- a/custom/jao-custom-x11.el
+++ b/custom/jao-custom-x11.el
@@ -79,11 +79,11 @@
(defun jao-set-wallpaper (&optional path)
(interactive)
(let ((current (format "~/.wallpaper.%s" (jao-colors-scheme))))
- (when-let ((f (or (and path (expand-file-name path))
- (read-file-name "Image: "
- jao-wallpaper-dir
- (file-symlink-p current)
- t))))
+ (when-let* ((f (or (and path (expand-file-name path))
+ (read-file-name "Image: "
+ jao-wallpaper-dir
+ (file-symlink-p current)
+ t))))
(make-symbolic-link f current t)
(cond (jao-river-enabled (jao-river-set-wallpaper f))
(jao-sway-enabled (jao-sway-set-wallpaper f))