Add emacs-transmission, move system/user packages

1 files changed, 39 insertions, 0 deletions

diff --git a/.config/emacs/modules/bd--files.el b/.config/emacs/modules/bd--files.el
new file mode 100644
index 0000000..49e819a
--- /dev/null
+++ b/.config/emacs/modules/bd--files.el
@@ -0,0 +1,39 @@
+;; -*- lexical-binding: t; -*-
+
+
+;;;; dired
+(require 'dired)
+(keymap-global-set "C-c d" 'dired-jump)
+(keymap-set dired-mode-map "h" #'dired-hide-details-mode)
+
+(add-hook 'dired-mode-hook #'dired-hide-details-mode)
+
+(setopt dired-listing-switches "-alhLG --time-style=long-iso --group-directories-first"
+
+        dired-recursive-copies 'always
+        dired-recursive-deletes 'always
+
+        dired-auto-revert-buffer t
+
+        ;; "dwim": guess where to move files
+        dired-dwim-target t
+
+        dired-guess-shell-alist-user
+        `((,(regexp-opt '(".mkv" ".mov" ".mp4" ".webm" ".m4v" ".wav" ".mp3" ".opus" ".ogv" ".flac")) "mpv &")
+          (,(regexp-opt '(".jpeg" ".jpg" ".png")) "feh &")
+          (,(regexp-opt '(".pdf")) "pdftotext -nopgbrk -enc UTF-8 -eol unix -layout")
+          (,(regexp-opt '(".html")) "icecat &")))
+
+(require 'all-the-icons)
+(use-package all-the-icons-dired
+  :hook
+  ((dired-mode . all-the-icons-dired-mode)))
+
+
+;;;; transmission
+(use-package transmission
+  :bind
+  (:map transmission-mode-map
+        ("R" . #'transmission-move)))
+
+(provide 'bd--files)