]> code.delx.au - gnu-emacs-elpa/commitdiff
Fix #43 - Actually use beacon-blink-when-buffer-changes
authorArtur Malabarba <bruce.connor.am@gmail.com>
Mon, 21 Mar 2016 12:51:23 +0000 (09:51 -0300)
committerArtur Malabarba <bruce.connor.am@gmail.com>
Mon, 21 Mar 2016 12:51:23 +0000 (09:51 -0300)
beacon.el

index 422614919bda9ca9760b50a20bf8cffdf77e0790..e978a7c72bc1dd9f801b3831d8200d665106160a 100644 (file)
--- a/beacon.el
+++ b/beacon.el
@@ -5,7 +5,7 @@
 ;; Author: Artur Malabarba <emacs@endlessparentheses.com>
 ;; URL: https://github.com/Malabarba/beacon
 ;; Keywords: convenience
-;; Version: 1.0
+;; Version: 1.1
 ;; Package-Requires: ((seq "1.11"))
 
 ;; This program is free software; you can redistribute it and/or modify
@@ -387,6 +387,11 @@ The same is true for DELTA-X and horizonta movement."
   (cond
    ;; Sanity check.
    ((not (markerp beacon--previous-place)))
+   ;; Blink for switching buffers.
+   ((and beacon-blink-when-buffer-changes
+         (not (eq (marker-buffer beacon--previous-place)
+                  (current-buffer))))
+    (beacon-blink-automated))
    ;; Blink for switching windows.
    ((and beacon-blink-when-window-changes
          (not (eq beacon--previous-window (selected-window))))