Command Reactor Error

The following code is placed as written in both the ACAD.LSP and ACADDOC.LSP file. It controls a function (UPDATE) which is executed just prior to the plot/ print command to update our border date stamp and xref file listing.

The problem has to be something in the 2004 VLisp implementation as I have had this exact code running for several years in both 2000i and 2002.

The exact error message is: Error: no function definition: O:CMNDPLOT which repeats about 8 times just prior to the startup function prompt coded below the reactor code listed below.

I've rum the 2004 Lisp analyzer on it and it comes up fine and there's nothing in the developer help to indicate the command syntax has changed.

I'm looking to converting over next Wednesday so any help with this one will be greatly appreciated.

;;/Reactor Functions (begin close and plot/print) -------------(defun O:cleanUpReactors( / n)
(foreach n O:ReactorList
(if (and n (vlr-added-p n)) (vlr-remove n) )
)
(setq O:Reactorlist nil)
)
(defun O:CmndPLOT (reactor cdata / CName)
(setq CName (cond ((car cdata))((getvar "CMDNAMES"))))
(cond
((= CName "PLOT")(update) )
((= "PRINT" CName) (update) )
(T nil)
)
)

(vl-load-com)
(O:cleanUpReactors)

;/Save a reference to all reactors & a master list of set
(setq O:ReactorList (list
(vlr-command-reactor nil '(vlr-commandwillstart .
O:CmndPLOT))) )
)

If I remove the remark characters from this section the error returns but the reactor does fire and the (Update) function executes. I’m fairly certain the problem resides with the vlr-commandwillstart function but according to the 2004 on-line developer help I’ve got the syntax fine…

Any help would be great - thanks