$object->widget( ... ,
                 command => sub{ About( 'program' ); },
                 ...
                );