* layers/+spacemacs/spacemacs-defaults/funcs.el: Enhance copying file…

… path for dired-mode
syl20bnr · Dec 29, 2024 · bba77f4 · bba77f4
1 parent c5fc206
commit bba77f4
Showing 1 changed file with 8 additions and 2 deletions.
diff --git a/layers/+spacemacs/spacemacs-defaults/funcs.el b/layers/+spacemacs/spacemacs-defaults/funcs.el
@@ -861,9 +861,15 @@ ones created by `magit' and `dired'."
     (user-error "Current buffer is not visiting a file or directory")))
 
 (defun spacemacs/copy-file-path ()
-  "Copy and show the file path of the current buffer."
+  "Copy and show the file path of the current buffer. If the buffer is a
+dired buffer, the result will be the file path under cursor, otherwise
+the result is directory path."
   (interactive)
-  (if-let* ((file-path (spacemacs--file-path)))
+  (if-let* ((file-path (or (spacemacs--file-path)
+                           (and (derived-mode-p 'dired-mode)
+                                (condition-case nil
+                                    (dired-get-file-for-visit)
+                                  (error default-directory))))))
       (progn
         (kill-new file-path)
         (message "%s" file-path))