Added keyboard 'throws' of items for display in specific windows; fixed compilation error; released 7.0.2

* hversion.el: Released 7.0.2.

* hui-window.el (hmouse-at-item-p): Added to test if on a draggable item.

* hmouse-drv.el (hkey-throw): Added to throw a drag item to a specific window via the
    ace-window package and the key sequence {M-o t <window-id>}, leaving the original
    source window selected.
* man/hyperbole.texi (Keyboard Drags): Added description of throwing an item.

* hui-mouse.el: Fixed a compilation time problem with when hmouse-alist was defined.

==============================================================================
V7.0.2 changes ^^^^:
==============================================================================

Author: rswgnu

Changes

@@ -1,3 +1,20 @@
+2017-11-23  Bob Weiner  <[email protected]>
+
+* hversion.el: Released 7.0.2.
+
+* hui-window.el (hmouse-at-item-p): Added to test if on a draggable item.
+
+* hmouse-drv.el (hkey-throw): Added to throw a drag item to a specific window via the
+    ace-window package and the key sequence {M-o t <window-id>}, leaving the original
+    source window selected.
+* man/hyperbole.texi (Keyboard Drags): Added description of throwing an item.
+
+* hui-mouse.el: Fixed a compilation time problem with when hmouse-alist was defined.
+
+==============================================================================
+V7.0.2 changes ^^^^:
+==============================================================================
+
 2017-11-22  Bob Weiner  <[email protected]>
 
 * hversion.el: Released 7.0.1.

DEMO

@@ -1152,14 +1152,15 @@ made.  An Assist Key Drag will move the the item list buffer to the destination
 (swapping buffers), just as it does with other buffers.  Practice these drags as
 they will prove very beneficial across time.
 
-For even faster keyboard-based drag emulation, use the Emacs package
-'ace-window' (see "(hyperbole)Keyboard Drags" for setup).  Once this is
-configured, the leftmost character or two of each window's modeline will show
-the ID to type to use that window as the drag destination.  Then whenever point
-is on an item you want displayed in another window, use M-o i
-<id-of-window-to-display-item-in> and watch the magic happen.  You can also use
-this to create explicit button links to other window buffers when in an editable
-buffer.
+For even faster keyboard-based drag emulation, use the Emacs package 'ace-window'
+(see "(hyperbole)Keyboard Drags" for setup).  Once this is configured, the
+leftmost character or two of each window's modeline will show the ID to type to
+use that window as the drag destination. Then whenever point is on an item you
+want displayed in another window, use M-o i <window-id> and watch the magic
+happen.  You can also use this to create explicit button links to other window
+buffers when in an editable buffer.  If you want to display multiple items in
+different windows, instead use the M-o t <window-id> key sequence to @emph{throw}
+the item to the window.
 
 *** Cloning Windows
 

HY-ABOUT

@@ -3,7 +3,7 @@
 		   Designed and Written by Bob Weiner
  	        Maintained by Mats Lidell and Bob Weiner
 	         https://www.gnu.org/software/hyperbole/
-                            Version 7.0.1
+                            Version 7.0.2
 
 GNU Hyperbole (pronounced Ga-new Hi-per-bo-lee), or just Hyperbole, is
 an efficient and programmable hypertextual information management

HY-ANNOUNCE

@@ -1,3 +1,78 @@
+----------------------------------------------------------------------
+7.0.2 Announcement
+----------------------------------------------------------------------
+From: Bob Weiner <[email protected]>
+To: [email protected], [email protected], [email protected], [email protected], [email protected]
+Subject: GNU Hyperbole 7.0.1-7.0.2 is now available
+Date: Wed, 23 Nov 2017
+--text follows this line--
+This is a minor release with a number of small issues resolved and the following
+new features:
+
+  SMART (ACTION AND ASSIST) KEYS
+
+    - Keyboard Drags: Keyboard emulation of many Smart Mouse Key drag actions.
+      See "(hyperbole)Keyboard Drags".
+  
+    - Keyboard Help: When {M-o} is bound to the `hkey-operate' command to
+      emulate drag depress and release events, then when in the release window
+      prior to pressing the second {M-o}, {C-h A} now reports the drag
+      action associated with the current release point.  See "(hyperbole)C-h A".
+
+    - Ace Window: Integrated Hyperbole item drag and link creation with this
+      package's direct window selection.  Use {M-o i <window-id>}.
+      You typically can display any Dired or Buffer Menu item in any window
+      with a single 3 keystroke command!
+
+      Also added the ability to 'throw' an item to a window while leaving the
+      selected window the same.  Use {M-o t <window-id>}.  This
+      works in Dired, Buffer Menu, iBuffer Menu and Treemacs modes and lets
+      you throw multiple items to multiple windows quickly.
+
+      See "(hyperbole)Keyboard Drags" for setup and use instructions.
+
+    - Smart Treemacs: Smart Key and item drag support for the Treemacs package.
+      See "(hyperbole)Smart Key - Treemacs".
+
+  HYROLO
+
+    - Fixed Google Contacts support to prompt for authorization only during
+      first time use.
+
+-----
+
+For details on what Hyperbole is and how to obtain and install it, see:
+
+  https://www.gnu.org/s/hyperbole
+
+For a list of use cases, see:
+
+  https://www.gnu.org/s/hyperbole/HY-WHY.html
+
+For a full list of new features in Hyperbole 7, see:
+
+  https://git.savannah.gnu.org/cgit/hyperbole.git/plain/HY-NEWS
+
+For what users think about Hyperbole, see:
+
+  https://www.gnu.org/s/hyperbole/hyperbole.html#user-quotes
+
+Bob Weiner designed and wrote GNU Hyperbole.  He and Mats
+Lidell maintain it with the Free Software Foundation.  It includes
+an interactive demo to introduce you to its features as well as a
+detailed reference manual, as explained here:
+
+  https://www.gnu.org/s/hyperbole/hyperbole.html#invocation-and-doc
+
+
+Happy Thanksgiving,
+
+Bob Weiner and Mats Lidell
+
+
+----------------------------------------------------------------------
+7.0.0 Announcement
+----------------------------------------------------------------------
 To: [email protected], [email protected], [email protected], [email protected], [email protected]
 ANNOUNCE: GNU Hyperbole 7, a.k.a the Git Ready for Action Release, is now available
 

HY-NEWS

@@ -1,6 +1,16 @@
 			  What's New in GNU Hyperbole
 				 by Bob Weiner
 
+===========================================================================
+*                                   V7.0.2
+===========================================================================
+
+    - Ace Window: Added the ability to 'throw' an item to a window while
+      leaving the selected window the same.  Use {M-o t <window-id>}.  This
+      works in Dired, Buffer Menu, iBuffer Menu and Treemacs modes and lets
+      you throw multiple items to multiple windows quickly.  See
+      "(hyperbole)Keyboard Drags" for setup and use instructions.
+
 ===========================================================================
 *                                   V7.0.1
 ===========================================================================
@@ -12,14 +22,17 @@
 
     - Keyboard Help: When {M-o} is bound to the `hkey-operate' command to
       emulate drag depress and release events; when in the release window
-      prior to pressing the second {M-o}, the {C-h A} now reports the drag
+      prior to pressing the second {M-o}, {C-h A} now reports the drag
       action associated with the current release point.  See "(hyperbole)C-h A".
 
     - Smart Treemacs: Smart Key and item drag support for the Treemacs package.
       See "(hyperbole)Smart Key - Treemacs".
 
     - Ace Window: Integrated Hyperbole item drag and link creation with this
-      package's direct window selection.  See "(hyperbole)Keyboard Drags".
+      package's direct window selection.  Use {M-o i <window-id>}.
+      You typically can display any Dired or Buffer Menu item in any window
+      with a single 3 keystroke command!  See "(hyperbole)Keyboard Drags"
+      for setup and use instructions.
 
   HYROLO
 

Makefile

@@ -54,7 +54,7 @@
 
 # This ver setup won't work under any make except GNU make, so set it manually.
 #HYPB_VERSION = "`head -3 hversion.el | tail -1 | sed -e 's/.*|\(.*\)|.*/\1/'`"
-HYPB_VERSION = 7.0.1
+HYPB_VERSION = 7.0.2
 
 # Emacs executable used to byte-compile .el files into .elc's.
 # Possibilities include: emacs, infodock, xemacs, etc.

README.md

@@ -1,4 +1,4 @@
-# GNU Hyperbole 7.0.1 - The Everyday Hypertextual Information Manager
+# GNU Hyperbole 7.0.2 - The Everyday Hypertextual Information Manager
 
 <!-- START doctoc generated TOC -->
 **Table of Contents**

README.md.html

@@ -1,5 +1,5 @@
 <h1>
-<a id="user-content-gnu-hyperbole-701---the-everyday-hypertextual-information-manager" class="anchor" href="#gnu-hyperbole-701---the-everyday-hypertextual-information-manager" aria-hidden="true"><span aria-hidden="true" class="octicon octicon-link"></span></a>GNU Hyperbole 7.0.1 - The Everyday Hypertextual Information Manager</h1>
+<a id="user-content-gnu-hyperbole-702---the-everyday-hypertextual-information-manager" class="anchor" href="#gnu-hyperbole-702---the-everyday-hypertextual-information-manager" aria-hidden="true"><span aria-hidden="true" class="octicon octicon-link"></span></a>GNU Hyperbole 7.0.2 - The Everyday Hypertextual Information Manager</h1>
 
 <p><strong>Table of Contents</strong></p>
 <ul>

hmouse-drv.el

@@ -16,7 +16,10 @@
 ;;; Other required Elisp libraries
 ;;; ************************************************************************
 
-(eval-when-compile (require 'hui-window)) ;; for `hmouse-drag-item-to-display'
+(eval-when-compile 
+  (defvar hmouse-alist nil)
+  (require 'hui-window)
+  (makunbound 'hmouse-alist)) ;; for `hmouse-drag-item-to-display'
 (require 'hypb)
 
 ;; Quiet byte compiler warnings for these free variables.
@@ -364,6 +367,26 @@ Only works when running under a window system, not from a dumb terminal."
     ;; Leave hkey-drag to choose selected window
     (hkey-drag release-window)))
 
+;;;###autoload
+(defun hkey-throw (release-window)
+  "Emulate Smart Mouse Key drag from selected window to RELEASE-WINDOW.
+After the drag, the selected window remains the same as it was before
+the drag.
+
+Optional prefix ARG non-nil means emulate Assist Key rather than the
+Action Key.
+
+Only works when running under a window system, not from a dumb terminal."
+  (let ((start-win (selected-window)))
+    (condition-case nil
+	;; This may trigger a No Action error if start-win and
+	;; release-win are the same.
+	(hkey-drag release-window)
+      (error (when (eq start-win release-window)
+	       (hmouse-drag-item-to-displ
+		ay))))
+    (when (window-live-p start-win) (select-window start-win))))
+
 (defun hkey-ace-window-setup (&optional key)
   "Bind optional keyboard KEY and setup display of items in windows specified by short ids.
 
@@ -391,6 +414,7 @@ magic happen."
   (require 'ace-window)
   (when key (global-set-key key 'ace-window))
   (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)
 	;; allows {i} operation to work when only 2 windows exist
 	aw-dispatch-always t)

hui-mouse.el

@@ -375,7 +375,6 @@ Action and Assist Mouse Keys.")
 (autoload 'var:append "hvar" "Append to a list variable." nil)
 
 (require 'hargs)
-(require 'hmouse-key)
 (defvar hmouse-alist hkey-alist
   "Alist of predicates and form-conses for the Action and Assist Mouse Keys.
 When the Action Mouse Key or Assist Mouse Key is pressed, the first or second
@@ -385,6 +384,11 @@ evaluated.
 The `hkey-alist' variable is the subset of this alist used by the
 smart keyboard keys.")
 
+;; This must be required after hmouse-alist is defined since this will
+;; recursively require hmouse-drv which requires hui-window when being
+;; compiled and that library requires that hmouse-alist be defined.
+(require 'hmouse-key)
+
 ;; This next library adds drag actions to `hmouse-alist'.
 (load "hui-window")