[elpa] scratch/hyperbole-lexbind 2aa1241 1/3: Delete hkey-ace-window-setup bindings before rebinding; fixed hkey-throw split line typo and hycontrol-frame-offset typo

[Stefan Monnier]

branch: scratch/hyperbole-lexbind
commit 2aa124144ef49d67b09dbe147992879d29554cb7
Author: Bob Weiner <address@hidden>
Commit: Bob Weiner <address@hidden>

    Delete hkey-ace-window-setup bindings before rebinding; fixed hkey-throw 
split line typo and hycontrol-frame-offset typo
    
    * hmouse-drv.el (hkey-ace-window-setup): Added deletion of i and t command 
bindings before
        adding them to aw-dispatch-alist.
                    (hkey-throw): Fixed split line code typo here.
      hycontrol.el (hycontrol-frame-offset): Fixed typo.
---
 Changes       | 11 +++++++++++
 hmouse-drv.el |  5 +++--
 hycontrol.el  |  4 ++--
 3 files changed, 16 insertions(+), 4 deletions(-)

diff --git a/Changes b/Changes
index 47e574d..7a4326f 100644
--- a/Changes
+++ b/Changes
@@ -1,3 +1,14 @@
+2017-11-26  Bob Weiner  <address@hidden>
+
+* hmouse-drv.el (hkey-ace-window-setup): Added deletion of i and t command 
bindings before
+    adding them to aw-dispatch-alist.
+                (hkey-throw): Fixed split line code typo here.
+  hycontrol.el (hycontrol-frame-offset): Fixed typo.
+
+==============================================================================
+V7.0.3 changes ^^^^:
+==============================================================================
+
 2017-11-23  Bob Weiner  <address@hidden>
 
 * hversion.el: Released 7.0.2.
diff --git a/hmouse-drv.el b/hmouse-drv.el
index 318b62e..842044d 100644
--- a/hmouse-drv.el
+++ b/hmouse-drv.el
@@ -383,8 +383,7 @@ Only works when running under a window system, not from a 
dumb terminal."
        ;; release-win are the same.
        (hkey-drag release-window)
       (error (when (eq start-win release-window)
-              (hmouse-drag-item-to-displ
-               ay))))
+              (hmouse-drag-item-to-display))))
     (when (window-live-p start-win) (select-window start-win))))
 
 (defun hkey-ace-window-setup (&optional key)
@@ -413,6 +412,8 @@ window, use {M-o i <id-of-window-to-display-item-in>} and 
watch the
 magic happen."
   (require 'ace-window)
   (when key (global-set-key key 'ace-window))
+  (setq aw-dispatch-alist (delq (assq ?t aw-dispatch-alist)
+                               (delq (assq ?i aw-dispatch-alist) 
aw-dispatch-alist)))
   (push '(?i hkey-drag-to "Hyperbole Drag To") aw-dispatch-alist)
   (push '(?t hkey-throw   "Hyperbole Throw") aw-dispatch-alist)
   (setq aw-keys '(?a ?s ?d ?f ?g ?h ?j ?k ?l)
diff --git a/hycontrol.el b/hycontrol.el
index f4e72dd..165ce8c 100644
--- a/hycontrol.el
+++ b/hycontrol.el
@@ -151,7 +151,7 @@ major-mode 'c-mode).")
   :group 'hyperbole-screen)
 
 (defcustom hycontrol-invert-mode-line-flag t
-  "When t (default) and in a HyControl mode, invert mode-line to emphasize the 
special key bindings in effect."
+  "*When t (default) and in a HyControl mode, invert mode-line to emphasize 
the special key bindings in effect."
   :type 'boolean
   :group 'hyperbole-screen)
 
@@ -170,7 +170,7 @@ The unit counter resets to the last digit entered whenever 
this value is exceede
 
 (defcustom hycontrol-frame-offset '(13 . 23)
   "*Increase in pixel offset for new hycontrol frames relative to the selected 
frame.
-It's value is an (x-offset . y-offset) pair in pixels."
+Its value is an (x-offset . y-offset) pair in pixels."
   :type '(cons integer integer)
   :group 'hyperbole-screen)