branch: externals/hyperbole commit 5db0f2055a34fb6d893511ab1ec2b9a698ce18b7 Author: Bob Weiner <r...@gnu.org> Commit: Bob Weiner <r...@gnu.org>
Add ibut Edit and Modify menu entries --- ChangeLog | 5 +++-- hui-menu.el | 3 +++ hui-mini.el | 2 ++ hui.el | 1 + 4 files changed, 9 insertions(+), 2 deletions(-) diff --git a/ChangeLog b/ChangeLog index 73f703a4bf..c8929528d2 100644 --- a/ChangeLog +++ b/ChangeLog @@ -5,8 +5,9 @@ * Makefile (test-all): Add conditionals to always run GUI Emacs if DISPLAY is set. -* hui-mini.el (hui:menus): Add named Ibut/Modify. -* hui.el (hui:ebut-modify, hui:gbut-modify): Interactively if on a button, still allow +* hui-menu.el (infodock-hyperbole-menu): Add Implicit-Button/{Edit, Modify}. + hui-mini.el (hui:menus): Add named Ibut/{Edit, Modify} (do the same thing). + hui.el (hui:ebut-modify, hui:gbut-modify): Interactively if on a button, still allow choice of another button. (hui:ibut-modify): Add named ibut modification. (hui:ebut-modify, hui:gbut-modify): Add 2nd save-excursion so point does diff --git a/hui-menu.el b/hui-menu.el index 3d3c6cca78..2222c636fc 100644 --- a/hui-menu.el +++ b/hui-menu.el @@ -3,6 +3,7 @@ ;; Author: Bob Weiner ;; ;; Orig-Date: 28-Oct-94 at 10:59:44 +;; Last-Mod: 24-Jan-22 at 00:18:47 by Bob Weiner ;; ;; Copyright (C) 1994-2021 Free Software Foundation, Inc. ;; See the "HY-COPY" file for license information. @@ -411,8 +412,10 @@ REBUILD-FLAG is non-nil, in which case the menu is rebuilt." "----" ["Activate" hui:ibut-act t] ["Delete-Type" (hui:htype-delete 'ibtypes) t] + ["Edit" hui:ibut-modify t] ["Help" hui:hbut-help t] ["Label" hui:ibut-label-create t] + ["Modify" hui:ibut-modify t] ["Rename" hui:ibut-rename t] ["Types" (hui:htype-help 'ibtypes 'no-sort) t]) '("Koutliner" diff --git a/hui-mini.el b/hui-mini.el index 8db7c62982..2730817eab 100644 --- a/hui-mini.el +++ b/hui-mini.el @@ -3,6 +3,7 @@ ;; Author: Bob Weiner ;; ;; Orig-Date: 15-Oct-91 at 20:13:17 +;; Last-Mod: 24-Jan-22 at 00:18:47 by Bob Weiner ;; ;; Copyright (C) 1991-2021 Free Software Foundation, Inc. ;; See the "HY-COPY" file for license information. @@ -688,6 +689,7 @@ constructs. If not given, the top level Hyperbole menu is used." "Activates implicit button at point or prompts for labeled implicit button to activate.") ("DeleteIButType" (hui:htype-delete 'ibtypes) "Deletes specified button type.") + ("Edit" hui:ibut-modify "Edits/modifies named implicit button attributes.") ("Help" hui:hbut-help "Reports on button's attributes.") ("Info" (id-info "(hyperbole)Implicit Buttons") "Displays manual section on implicit buttons.") diff --git a/hui.el b/hui.el index ca6a527302..2f6390800a 100644 --- a/hui.el +++ b/hui.el @@ -3,6 +3,7 @@ ;; Author: Bob Weiner ;; ;; Orig-Date: 19-Sep-91 at 21:42:03 +;; Last-Mod: 24-Jan-22 at 00:18:52 by Bob Weiner ;; ;; Copyright (C) 1991-2021 Free Software Foundation, Inc. ;; See the "HY-COPY" file for license information.