From 2b4e4cb4d0b448ca5a1a80e4fc0ecdbe6b66c57f Mon Sep 17 00:00:00 2001 From: Protesilaos Stavrou Date: Tue, 4 Mar 2025 07:25:39 +0200 Subject: [PATCH] emacs: experiment with dired-preview-display-action-alist on the side --- .../prot-emacs-modules/prot-emacs-dired.el | 19 ++++++++++--------- emacs/.emacs.d/prot-emacs.org | 19 ++++++++++--------- 2 files changed, 20 insertions(+), 18 deletions(-) diff --git a/emacs/.emacs.d/prot-emacs-modules/prot-emacs-dired.el b/emacs/.emacs.d/prot-emacs-modules/prot-emacs-dired.el index 5dc94b06..d308a16c 100644 --- a/emacs/.emacs.d/prot-emacs-modules/prot-emacs-dired.el +++ b/emacs/.emacs.d/prot-emacs-modules/prot-emacs-dired.el @@ -147,16 +147,17 @@ "epub" "\\)")) - ;; (setq dired-preview-display-action-alist - ;; '((display-buffer-in-side-window) - ;; (side . bottom) - ;; (window-height . 0.2) - ;; (preserve-size . (t . t)) - ;; (window-parameters . ((mode-line-format . none) - ;; (header-line-format . none))))) - (setq dired-preview-display-action-alist - #'dired-preview-display-action-alist-below)) + '((display-buffer-in-side-window) + (side . right) + (window-width . 0.2) + (preserve-size . (t . t)) + (window-parameters . ((mode-line-format . none) + (header-line-format . none))))) + + ;; (setq dired-preview-display-action-alist + ;; #'dired-preview-display-action-alist-below) + ) (use-package ready-player :ensure t diff --git a/emacs/.emacs.d/prot-emacs.org b/emacs/.emacs.d/prot-emacs.org index afe21604..439ad1a4 100644 --- a/emacs/.emacs.d/prot-emacs.org +++ b/emacs/.emacs.d/prot-emacs.org @@ -5778,16 +5778,17 @@ are where we need to be. "epub" "\\)")) - ;; (setq dired-preview-display-action-alist - ;; '((display-buffer-in-side-window) - ;; (side . bottom) - ;; (window-height . 0.2) - ;; (preserve-size . (t . t)) - ;; (window-parameters . ((mode-line-format . none) - ;; (header-line-format . none))))) - (setq dired-preview-display-action-alist - #'dired-preview-display-action-alist-below)) + '((display-buffer-in-side-window) + (side . right) + (window-width . 0.2) + (preserve-size . (t . t)) + (window-parameters . ((mode-line-format . none) + (header-line-format . none))))) + + ;; (setq dired-preview-display-action-alist + ;; #'dired-preview-display-action-alist-below) + ) #+end_src *** The =prot-emacs-dired.el= section about multimedia previews (~ready-player~)