12 lines
330 B
EmacsLisp
Raw Normal View History

2025-02-15 23:44:40 +06:00
(defun a/nsxiv ()
(interactive)
(let ((current (dired-current-directory)))
2025-04-18 21:40:38 +06:00
(async-shell-command (concat "nsxiv " current) "*Messages*"))
(other-window 1)
(evil-quit))
2025-02-15 23:44:40 +06:00
(defun a/pcmanfm ()
(interactive)
(let ((current (dired-current-directory)))
(async-shell-command (concat "pcmanfm " current) "*Messages*")))