I made a code like this:
(defun func () (let ((xhr (new ((@ window -x-m-l-http-request))))) (chain xhr (open "GET" "/something.xml")) (chain xhr (send null)) (setf (@ xhr onreadystatechange) (alert "abc"))))
Then I made :onclick event to call a function "func" and when I click I get the messagge box "abc". How to get some lisp function return value in the messagge box ?