edit-menu:select-all-on-demand in frame:standard-menus<%>
The menu item's on-demand method calls this method
(-> voidsenda-frame:standard-menusedit-menu:select-all-on-demanditem)
item:menu-item%Defaultly is this:
(λ (item) (let* ((editor (get-edit-target-object)) (enable? (and editor (is-a?editor editor<\%>) (send editor can-do-edit-operation? (quote select-all))))) (send item enable enable?)))