edit-menu:copy-callback in frame:standard-menus<%>
This method is called when the copy menu-item of the edit-menu menu is selected.
( -> void
send a-frame:standard-menus edit-menu:copy-callback item evt)
item : (instance (derived-from menu-item%))
evt : (instance control-event%)
Defaultly bound to:
(lambda (menu evt)
(let ((edit (get-edit-target-object)))
(when (and edit (is-a? edit editor<%>))
(send edit do-edit-operation 'copy)))
#t)