AutoCAD 2008: Global Error Checking Lisp


I'm trying to build a global error checking routine such that, if a custom lisp command is escaped mid-way through, the user's settings are returned to their previous state (i.e. before the command was issued).

I found just such a routine at

formatting link
have attempted to adapt it for my purposes but something's not right. For instance osnaps are not restored to their original setting.

Below, I've included the handful of statements that top and tail my own custom lisp routine, together with the error checking routine (slightly modified from the original). Any thoughts:

-- (defun c:gea () (initerr) ;error checking (command "_.undo" "_g")...

...(command "_.undo" "_end") (reset) (princ) )

Reply to
Loading thread data ...

PolyTech Forum website is not affiliated with any of the manufacturers or service providers discussed here. All logos and trade names are the property of their respective owners.