Reacting to PAN and ZOOM ?

[chavlji]

Hello.

I set the following reactor, to call Callback whenever user PANs then viewport:

(defun CallBack(event parameter)
   (If    (eq (car parameter) "VIEWCTR") (princ "Pan!") ) )

(if (not PanReactor)
  (setq PanReactor (vlr-sysvar-reactor nil '((:vlr-sysvarchanged . CallBack))) ) )

 

However it never writes "Pan!". It seems to me that changing "VIEWCTR" doesnt even reacts to the following reactor... so how to trap PAN and ZOOM actions?

[ASMI]

Reactors doesn't work with some read only variables. For example DATE, CMDACTIVE or VIEWCTR.