;;; private/ranger/config.el -*- lexical-binding: t; -*-

(def-package! dired
  :hook (dired-mode . +my/dired-setup)
  :config
  ;; Use GNU ls as `gls' from `coreutils' if available.  Add `(setq
  ;; dired-use-ls-dired nil)' to your config to suppress the Dired warning when
  ;; not using GNU ls.  We must look for `gls' after `exec-path-from-shell' was
  ;; initialized to make sure that `gls' is in `exec-path'
  (when IS-MAC
    (let ((gls (executable-find "gls")))
      (if gls
          (setq insert-directory-program gls)
        (message "Please install `gls` using `brew instal coreutils`..."))))
  (setq dired-listing-switches "-aBhl --group-directories-first"))


(def-package! ranger
  :init
  (setq ranger-override-dired t)
  ;; set up image-dired to allow picture resize
  (setq image-dired-dir (concat doom-cache-dir "image-dir"))
  (unless (file-directory-p image-dired-dir)
    (make-directory image-dired-dir))
  :config
  (setq ranger-omit-regexp "^\.DS_Store$"
        ranger-excluded-extensions '("mkv" "iso" "mp4")
        ranger-deer-show-details nil
        ranger-max-preview-size 10))


(def-package! all-the-icons-dired
  :defer t
  :init
  (when (display-graphic-p)
    (add-hook! 'dired-mode-hook #'all-the-icons-dired-mode)))


(def-package! font-lock+)


(def-package! dired-x)