Topic: Runs yet it doesn't

[ronjonp]

Unless 

[David Hall]

unless what?  I tried to open, which worked, and when I call layer command, fatal exception

[Lee Mac]

Haven't looked at the drawing, but I'm guessing clayer has been frozen using entmod 

[ronjonp]

Haven't looked at the drawing, but I'm guessing clayer has been frozen using entmod 

 

[irneb]

sledge hammers, how do they work?

I like this comparison!

Sledgehammer:

Code: [Select]

...vl-catch-all-apply...

Toothpick:

Code - Auto/Visual Lisp: [Select]

1. (defun c:foo  (/ )
2.   (vl-load-com)
3.   (vlax-for eachLayer  (vla-get-Layers (vla-get-ActiveDocument (vlax-get-acad-object)))
4.     (if (and (vlax-property-available-p eachLayer 'Freeze t)
5.              (= (vla-get-Freeze eachLayer) :vlax-true))
6.       (vla-put-Freeze eachLayer :vlax-false)))
7.   (princ))

Should even catch the hacked entmod'ed current layer 

Edit: Also got rid of all those (used only once) local variables. You don't need them in Lisp, not like in VBA/C++/C#.