The following example defines the
delete-file
presentation-to-command translator:
(clim:define-presentation-to-command-translator
delete-file
(pathname com-delete-file my-command-table
:documentation "Delete this file"
:gesture :delete)
(object)
(list object))
Common Lisp Interface Manager 2.0 User's Guide - 20 Sep 2011