[nongnu] elpa/auto-dim-other-buffers bc36211be2 63/82: Dim buffers appearing in non-selected windows

[ELPA Syncer]

branch: elpa/auto-dim-other-buffers
commit bc36211be2d1d173dcbc505086958310a8e4c590
Author: Michal Nazarewicz <mina86@mina86.com>
Commit: Michal Nazarewicz <mina86@mina86.com>

    Dim buffers appearing in non-selected windows
    
    Make sure that if buffer in non-selected window changes or if a new
    window pops up, that buffer is dimmed.  Previously, if a new ‘*Help*’
    buffer appeared somewhere without being selected it incorrectly would
    stay undimmed.
---
 auto-dim-other-buffers.el | 32 ++++++++++++++++----------------
 1 file changed, 16 insertions(+), 16 deletions(-)

diff --git a/auto-dim-other-buffers.el b/auto-dim-other-buffers.el
index 89f208e695..875988ced3 100644
--- a/auto-dim-other-buffers.el
+++ b/auto-dim-other-buffers.el
@@ -9,7 +9,7 @@
 ;;     Michal Nazarewicz <mina86@mina86.com>
 ;; Maintainer: Michal Nazarewicz <mina86@mina86.com>
 ;; URL: https://github.com/mina86/auto-dim-other-buffers.el
-;; Version: 1.9.2
+;; Version: 1.9.3
 
 ;; This file is not part of GNU Emacs.
 
@@ -100,21 +100,21 @@ Currently only mini buffer and echo areas are ignored."
 (defun adob--buffer-list-update-hook ()
   "If buffer has changed, dim the last one and undim the new one."
   (let ((buf (window-buffer)))
-    (when (and
-           ;; Don’t do anything if buffer didn’t changed.
-           (not (eq buf adob--last-buffer))
-           ;; If so configured, don’t dim when switching to minibuffer.
-           (or auto-dim-other-buffers-dim-on-switch-to-minibuffer
-               (not (minibufferp buf))))
-      ;; Dim last buffer if it’s live and not ignored.
-      (and (buffer-live-p adob--last-buffer)
-           (not (adob--never-dim-p adob--last-buffer))
-           (with-current-buffer adob--last-buffer
-             (adob--dim-buffer)))
-      ;; Undim the new buffer.
-      (with-current-buffer buf
-        (adob--undim-buffer))
-      (setq adob--last-buffer buf))))
+    (if (not (eq buf (current-buffer)))
+        ;; A new buffer is displayed in some window somewhere.  This is not the
+        ;; selected buffer though so dim it.
+        (unless (adob--never-dim-p (current-buffer))
+          (adob--dim-buffer))
+      (unless (or (eq buf adob--last-buffer)
+                  (and auto-dim-other-buffers-dim-on-switch-to-minibuffer
+                       (minibufferp buf)))
+        ;; Buffer has changed.  Dim the old one and undim the new.
+        (and (buffer-live-p adob--last-buffer)
+             (not (adob--never-dim-p adob--last-buffer))
+             (with-current-buffer adob--last-buffer
+               (adob--dim-buffer)))
+        (adob--undim-buffer)
+        (setq adob--last-buffer buf)))))
 
 (defun adob--focus-out-hook ()
   "Dim all buffers if `auto-dim-other-buffers-dim-on-focus-out'."