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

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

[elpa] master 270c38b 16/24: Add a work-around for pop-to-buffer / dedic


From: Oleh Krehel
Subject: [elpa] master 270c38b 16/24: Add a work-around for pop-to-buffer / dedicated bug
Date: Fri, 01 May 2015 14:27:19 +0000

branch: master
commit 270c38be08e566a870b440afd884c060c9a013e7
Author: Oleh Krehel <address@hidden>
Commit: Oleh Krehel <address@hidden>

    Add a work-around for pop-to-buffer / dedicated bug
    
    * hydra.el (hydra--work-around-dedicated): New defvar.
    (hydra-keyboard-quit): Update.
    
    Fixes #124
    Fixes #119
---
 hydra.el |    7 ++++++-
 1 files changed, 6 insertions(+), 1 deletions(-)

diff --git a/hydra.el b/hydra.el
index 45daf2f..f94cdd4 100644
--- a/hydra.el
+++ b/hydra.el
@@ -381,13 +381,18 @@ Return DEFAULT if PROP is not in H."
 (defvar hydra-message-timer (timer-create)
   "Timer for the hint.")
 
+(defvar hydra--work-around-dedicated t
+  "When non-nil, assume there's no bug in `pop-to-buffer'
+  selecting a dedicated window.")
+
 (defun hydra-keyboard-quit ()
   "Quitting function similar to `keyboard-quit'."
   (interactive)
   (hydra-disable)
   (cancel-timer hydra-timeout-timer)
   (cancel-timer hydra-message-timer)
-  (unless hydra--ignore
+  (unless (and hydra--ignore
+               (null hydra--work-around-dedicated))
    (if hydra-lv
        (lv-delete-window)
      (message "")))



reply via email to

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