From abcf0b601aede90a6088959536f2952cbceafe0d Mon Sep 17 00:00:00 2001 From: ndwarshuis Date: Fri, 11 Dec 2020 16:11:41 -0500 Subject: [PATCH] ENH move device directory --- etc/conf.org | 13 +++++++------ 1 file changed, 7 insertions(+), 6 deletions(-) diff --git a/etc/conf.org b/etc/conf.org index 2de7a3e..d195f51 100644 --- a/etc/conf.org +++ b/etc/conf.org @@ -233,7 +233,7 @@ desktop file exec directive." (defconst nd/device-mount-dirs (list - (f-join "/media" (user-login-name)) + (f-join "/tmp/media" (user-login-name)) (f-join "/run" "media" (user-login-name)))) (defun nd/get-mounted-directories () @@ -3483,11 +3483,12 @@ I handle device mounting using rofi and a custom mounting script (elsewhere in m (defun nd/find-devices () "Navigate to mounted devices." (interactive) - (let ((mounted (-annotate #'f-filename (nd/get-mounted-directories)))) - (-when-let (dev (completing-read "Go to device: " mounted)) - (-if-let (path (alist-get dev mounted nil nil #'equal)) - (find-file path) - (message "Invalid device: %s" dev))))) + (-if-let (mounted (-annotate #'f-filename (nd/get-mounted-directories))) + (-when-let (dev (completing-read "Go to device: " mounted)) + (-if-let (path (alist-get dev mounted nil nil #'equal)) + (find-file path) + (message "Invalid device: %s" dev))) + (message "No devices to mount"))) #+END_SRC *** filtering :PROPERTIES: