[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/dired-preview ea643a8912 54/67: Simplify dired-preview-
From: |
ELPA Syncer |
Subject: |
[elpa] externals/dired-preview ea643a8912 54/67: Simplify dired-preview-trigger |
Date: |
Sat, 8 Jul 2023 15:57:55 -0400 (EDT) |
branch: externals/dired-preview
commit ea643a89128166749eef079c9edc8e5a9ed1b694
Author: Protesilaos Stavrou <info@protesilaos.com>
Commit: Protesilaos Stavrou <info@protesilaos.com>
Simplify dired-preview-trigger
---
dired-preview.el | 26 +++++++++++---------------
1 file changed, 11 insertions(+), 15 deletions(-)
diff --git a/dired-preview.el b/dired-preview.el
index faf131f3e8..653dd758eb 100644
--- a/dired-preview.el
+++ b/dired-preview.el
@@ -283,21 +283,17 @@ With optional NO-DELAY do not start a timer. Otherwise
produce
the preview with `dired-preview-delay' of idleness."
(add-hook 'window-state-change-hook
#'dired-preview--close-previews-outside-dired)
(dired-preview--cancel-timer)
- (if-let* ((file (dired-file-name-at-point)))
- (cond
- ((and (dired-preview--preview-p file)
- (memq this-command dired-preview-trigger-commands))
- (if no-delay
- (dired-preview-display-file file)
- (setq dired-preview--timer
- (run-with-idle-timer
- dired-preview-delay
- nil
- #'dired-preview-display-file
- file))))
- ((and (not (dired-preview--preview-p file))
- (eq major-mode 'dired-mode))
- (dired-preview--close-previews)))
+ (if-let* ((file (dired-file-name-at-point))
+ ((dired-preview--preview-p file))
+ ((memq this-command dired-preview-trigger-commands)))
+ (if no-delay
+ (dired-preview-display-file file)
+ (setq dired-preview--timer
+ (run-with-idle-timer
+ dired-preview-delay
+ nil
+ #'dired-preview-display-file
+ file)))
(dired-preview--close-previews-outside-dired)))
(defun dired-preview-disable-preview ()
- [elpa] externals/dired-preview 33a27a68dc 64/67: Add README.org, which GNU ELPA converts into the Info manual, (continued)
- [elpa] externals/dired-preview 33a27a68dc 64/67: Add README.org, which GNU ELPA converts into the Info manual, ELPA Syncer, 2023/07/08
- [elpa] externals/dired-preview 959299b18a 39/67: Add FIXME for dired-preview-return-window-size, ELPA Syncer, 2023/07/08
- [elpa] externals/dired-preview 0dceaef04d 35/67: Use a function to return the display-buffer action, ELPA Syncer, 2023/07/08
- [elpa] externals/dired-preview d8ba2d0884 11/67: Simplify value of dired-preview-ignored-extensions-regexp, ELPA Syncer, 2023/07/08
- [elpa] externals/dired-preview 6bdcc34f68 52/67: Use "below" instead of "bottom" for direction, ELPA Syncer, 2023/07/08
- [elpa] externals/dired-preview 22f44d083c 10/67: Clear previewed buffers after they are killed, ELPA Syncer, 2023/07/08
- [elpa] externals/dired-preview 91fc74d122 49/67: Stop using a side window for previews, ELPA Syncer, 2023/07/08
- [elpa] externals/dired-preview 24bf5bce79 50/67: Add FIXME for dired-preview-display-action-alist-dwim, ELPA Syncer, 2023/07/08
- [elpa] externals/dired-preview 53ebf5d655 51/67: Change how window size is determined (fix 24bf5bc), ELPA Syncer, 2023/07/08
- [elpa] externals/dired-preview 0fa9aab1df 53/67: Add FIXME for how/why window parameters are unset, ELPA Syncer, 2023/07/08
- [elpa] externals/dired-preview ea643a8912 54/67: Simplify dired-preview-trigger,
ELPA Syncer <=
- [elpa] externals/dired-preview 4010cc9987 60/67: Implement garbage collection for buffer killing, ELPA Syncer, 2023/07/08
- [elpa] externals/dired-preview 4b89363599 61/67: Delete preview windows, including the selected one, ELPA Syncer, 2023/07/08
- [elpa] externals/dired-preview 98815455cb 65/67: Simplify README.md, pointing to the manual instead (per 33a27a6), ELPA Syncer, 2023/07/08
- [elpa] externals/dired-preview 6673bb1cd3 67/67: Update to version 0.1.0, ELPA Syncer, 2023/07/08
- [elpa] externals/dired-preview 4da6ee04bf 12/67: Make the display-buffer action alist customisable, ELPA Syncer, 2023/07/08
- [elpa] externals/dired-preview f2a720ca8f 13/67: Update dired-preview-set-up-preview-window doc to reference user option, ELPA Syncer, 2023/07/08
- [elpa] externals/dired-preview 04bfb749c7 22/67: Move two forms closer to where they are used, ELPA Syncer, 2023/07/08
- [elpa] externals/dired-preview 4857868357 33/67: Harden dired-preview--close-previews-outside-dired conditionality, ELPA Syncer, 2023/07/08
- [elpa] externals/dired-preview 38fab3d419 38/67: Use 'file-regular-p' instead of 'file-exists-p', ELPA Syncer, 2023/07/08
- [elpa] externals/dired-preview f6bb0e3271 44/67: Add TODO to only accummulate a fixed size of buffers, ELPA Syncer, 2023/07/08