[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: more on mouse to command presentation

(dw:with-output-as-presentation (:object '(car '(a b c))
				:type 'sys:form)
	(present "hi guy" 'string))

works for me in a Lisp Listener.  If you want the form evaled
*before* you give it back to the listener, then one way to do it
is to define a presentation translator mapping sys:forms into 
sys:forms, a la:

(define-presentation-translator evalit (sys:form sys:form)
  (eval form))