Function: hkey-window-link

hkey-window-link is an autoloaded, interactive and byte-compiled function defined in hmouse-drv.el.

Signature

(hkey-window-link RELEASE-WINDOW)

Documentation

Create a but in the selected window, linked to point in RELEASE-WINDOW.

RELEASE-WINDOW is interactively selected via the ace-window command. The selected window does not change.

With no prefix argument, create an unnamed implicit button. With a single \C-u '(4) prefix argument, create an explicit button. With any other prefix argument, like M-1, create an named implicit button.

Key Bindings

Source Code

;; Defined in ~/.emacs.d/elpa/hyperbole-20260414.325/hmouse-drv.el
;;;###autoload
(defun hkey-window-link (release-window)
  "Create a but in the selected window, linked to point in RELEASE-WINDOW.
RELEASE-WINDOW is interactively selected via the `ace-window' command.
The selected window does not change.

With no prefix argument, create an unnamed implicit button.
With a single \\`C-u' \\='(4) prefix argument, create an explicit button.
With any other prefix argument, like M-1, create an named implicit button."
  (interactive
   (list (let ((mode-line-text (concat " Ace - Hyperbole: " (nth 2 (assq ?w aw-dispatch-alist)))))
	   (aw-select mode-line-text))))
  (unless (window-live-p release-window)
    (error "(hkey-window-link): Invalid release window: %s" release-window))
  (let ((start-window (selected-window)))
    (unwind-protect
	(progn
	  (funcall (if (equal current-prefix-arg '(4))
		       #'hui:ebut-link-directly
		     #'hui:ibut-link-directly)
		   start-window release-window)
	  release-window)
      ;; Leave start-window selected
      (when (window-live-p start-window)
	(hypb:select-window-frame start-window)))))