0 Members and 1 Guest are viewing this topic.
I must be missing something in the "(cond...statement. Blocks don't get selected. I've stared at it long enough. I just don't see it... Code - Auto/Visual Lisp: [Select](defun c:foo7... ;; this cond statement doesn't seem to work. Block does not get selected. (cond ((= (cdr (assoc 0 (setq el (entget ent)))) "INSERT") (entmod (append el '((8 . "FiberMgt_015")))) )... ...);; end cond );; end foreach );; added missing ")" for "if" (princ) )
FYI Code - Auto/Visual Lisp: [Select] "*line*" Also works to include all line entities...