Hello .
Here is my code that would unfrozen a list of layers , but the issue is that the code does the trick and the entities being hidden for a while until
I jump to any layout and go back to model to allow objects to be appeared , and the command *regen* or *regenall* did not solve the issue .
Is there anything goes wrong within my code ?
(defun Unfrozen-Layers (Layerlist / tbl)
;;; Tharwat 20. march. 2012 ;;;
(foreach x Layerlist
(if (tblsearch "LAYER" x)
(entmod
(subst (cons 70 0)
(assoc 70 (setq tbl (entget (tblobjname "LAYER" x))))
tbl
)
)
)
)
(princ)
)
Thank you