emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/dired-preview 9a26b0c36c 5/8: Make dired-preview-hexl-t


From: ELPA Syncer
Subject: [elpa] externals/dired-preview 9a26b0c36c 5/8: Make dired-preview-hexl-toggle use dired-preview-with-window
Date: Sun, 28 Jul 2024 09:57:55 -0400 (EDT)

branch: externals/dired-preview
commit 9a26b0c36c0d7bf8573dc3d5d8ade77f70bdba38
Author: Protesilaos Stavrou <info@protesilaos.com>
Commit: Protesilaos Stavrou <info@protesilaos.com>

    Make dired-preview-hexl-toggle use dired-preview-with-window
---
 dired-preview.el | 11 +++++------
 1 file changed, 5 insertions(+), 6 deletions(-)

diff --git a/dired-preview.el b/dired-preview.el
index 0532ee863a..c112515aab 100644
--- a/dired-preview.el
+++ b/dired-preview.el
@@ -294,12 +294,11 @@ FILE."
 (defun dired-preview-hexl-toggle ()
   "Toggle preview between text and `hexl-mode'."
   (interactive)
-  (dolist (win (dired-preview--get-windows))
-    (with-selected-window win
-      (if (eq major-mode 'hexl-mode)
-          (hexl-mode-exit)
-        (hexl-mode))
-      (dired-preview--add-truncation-message))))
+  (dired-preview-with-window
+   (if (eq major-mode 'hexl-mode)
+       (hexl-mode-exit)
+     (hexl-mode)
+     (dired-preview--add-truncation-message))))
 
 (cl-defmethod dired-preview--get-buffer ((file (head large)))
   "Get preview buffer for large FILE.



reply via email to

[Prev in Thread] Current Thread [Next in Thread]