Skip to content

Commit 305858f

Browse files
committed
Fix smart-org with EOL, Org link and radio target additions
1 parent dd63d76 commit 305858f

File tree

2 files changed

+17
-7
lines changed

2 files changed

+17
-7
lines changed

ChangeLog

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -25,8 +25,8 @@
2525
hui-mouse.el (action-key-error, assist-key-error): When in Org mode,
2626
if no other context fired, use org-meta-return.
2727
hsys-org.el (hsys-org-heading-at-p): Add to support Hyperbole
28-
EOL handling and use in smart-org.
29-
28+
EOL handling and use in smart-org. Also when hsys-org-enable-smart-keys
29+
is 'buttons, follow Org links and radio targets.
3030

3131
* kotl/kotl-mode.el (kotl-mode:kill-whole-line): Add override
3232
of kill-whole-line for Koutliner.

hui-mouse.el

Lines changed: 15 additions & 5 deletions
Original file line numberDiff line numberDiff line change
@@ -1638,11 +1638,21 @@ handled by the separate implicit button type, `org-link-outside-org-mode'."
16381638
;; Continue with any further Smart Key non-Org contexts
16391639
nil))))
16401640
((eq hsys-org-enable-smart-keys 'buttons)
1641-
(when (hbut:at-p)
1642-
;; Activate/Assist with any Hyperbole button at point
1643-
(if (not assist-flag)
1644-
(hact 'hbut:act)
1645-
(hact 'hkey-help)))
1641+
(cond ((hsys-org-radio-target-def-at-p)
1642+
(hact 'org-radio-target)
1643+
t)
1644+
((setq start-end (hsys-org-link-at-p))
1645+
(if (not assist-flag)
1646+
(progn (hsys-org-set-ibut-label start-end)
1647+
(hact 'org-link))
1648+
(hact 'hkey-help))
1649+
t)
1650+
((hbut:at-p)
1651+
;; Activate/Assist with any Hyperbole button at point
1652+
(if (not assist-flag)
1653+
(hact 'hbut:act)
1654+
(hact 'hkey-help)))
1655+
(t (hact 'org-meta-return current-prefix-arg)))
16461656
;; Ignore any further Smart Key non-Org contexts
16471657
t)
16481658
(t

0 commit comments

Comments
 (0)