This method is called when the copy menu-item of the edit-menu menu is selected. If edit-menu:copy is bound to #f instead of a procedure, the copy menu item will not be created.
Defaultly bound to:
(lambda (menu evt) (let ((edit (get-edit-target-object))) (when (and edit (is-a? edit editor<%>)) (send edit do-edit-operation (quote copy)))) #t)