[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] master f439a41 27/34: Fix double blink when switching buffer
From: |
Artur Malabarba |
Subject: |
[elpa] master f439a41 27/34: Fix double blink when switching buffer |
Date: |
Fri, 16 Oct 2015 09:56:58 +0000 |
branch: master
commit f439a41c3ca070b5a5c0984d4d0c3603fb11e8d1
Author: Artur Malabarba <address@hidden>
Commit: Artur Malabarba <address@hidden>
Fix double blink when switching buffer
---
beacon.el | 10 +++-------
1 files changed, 3 insertions(+), 7 deletions(-)
diff --git a/beacon.el b/beacon.el
index 0b1ae0a..d7be5a6 100644
--- a/beacon.el
+++ b/beacon.el
@@ -288,23 +288,18 @@ If DELTA is nil, return nil."
(cond
((not (markerp beacon--previous-place))
(beacon--vanish))
- ;; Blink because we changed buffer.
- ((not (equal (marker-buffer beacon--previous-place)
- (current-buffer)))
- (when beacon-blink-when-buffer-changes
- (beacon-blink)))
;; Blink for scrolling.
((and beacon-blink-when-window-scrolls
beacon--window-scrolled
(equal beacon--window-scrolled (selected-window)))
- (beacon-blink)
- (setq beacon--window-scrolled nil))
+ (beacon-blink))
;; Blink for movement
((beacon--movement-> beacon-blink-when-point-moves)
(beacon-blink))
;; Even if we don't blink, vanish any previous beacon.
(t (beacon--vanish)))
(beacon--maybe-push-mark)
+ (setq beacon--window-scrolled nil)
(unless (window-minibuffer-p)
(setq beacon--previous-mark-head (car mark-ring))
(setq beacon--previous-place (point-marker))))
@@ -320,6 +315,7 @@ If invoked outside the command loop, `post-command-hook'
would be
unreliable, so just blink immediately."
(if this-command
(setq beacon--window-scrolled win)
+ (setq beacon--window-scrolled nil)
(beacon-blink)))
- [elpa] master c507480 13/34: Fix after-string overlays, (continued)
- [elpa] master c507480 13/34: Fix after-string overlays, Artur Malabarba, 2015/10/16
- [elpa] master 02112fa 12/34: Fix lighter, Artur Malabarba, 2015/10/16
- [elpa] master f1bb231 20/34: Fix scrolling outside command loop, Artur Malabarba, 2015/10/16
- [elpa] master 0b7041e 22/34: More documentation, Artur Malabarba, 2015/10/16
- [elpa] master 5622af4 25/34: [#2] Add more options for preventing a blink, Artur Malabarba, 2015/10/16
- [elpa] master 6f647f6 21/34: Only blink selected window, Artur Malabarba, 2015/10/16
- [elpa] master 0036355 23/34: Copyright, Artur Malabarba, 2015/10/16
- [elpa] master bccd3de 33/34: Document contributors, Artur Malabarba, 2015/10/16
- [elpa] master d1f0728 26/34: Extend doc, Artur Malabarba, 2015/10/16
- [elpa] master 4a7079e 17/34: Improve readme, Artur Malabarba, 2015/10/16
- [elpa] master f439a41 27/34: Fix double blink when switching buffer,
Artur Malabarba <=
- [elpa] master d66b206 28/34: Refactor overlay creation, Artur Malabarba, 2015/10/16
- [elpa] master b033c63 30/34: Merge pull request #6 from tsdh/master, Artur Malabarba, 2015/10/16
- [elpa] master 7294729 24/34: Don't blink on the minibuffer, Artur Malabarba, 2015/10/16
- [elpa] master 3e1defb 32/34: Don't blink in magit status buffers, Artur Malabarba, 2015/10/16
- [elpa] master d48f296 31/34: Doc, Artur Malabarba, 2015/10/16
- [elpa] master 0bdebed 29/34: Blink only in selected window; blink when switching windows, Artur Malabarba, 2015/10/16
- [elpa] master 441ebfe 19/34: Indentation, Artur Malabarba, 2015/10/16
- [elpa] master 849bc39 18/34: Rely on window-scroll-functions for scroll blinks, Artur Malabarba, 2015/10/16
- [elpa] master 2eb4c54 34/34: Add 'packages/beacon/' from commit 'bccd3de53787c996f9a90bcb5d541252deda01e1', Artur Malabarba, 2015/10/16