Topic: add variable extended data

[curmudgeon]

all the way back to the autocad help files:

Code: [Select]

(setq exdata '((-3 ("NEWDATA" (1000 . "This is a new thing!")))))
(entmod (append (entget (entlast)) exdata) )
and

Code: [Select]

(entget (car (entsel)) '("NEWDATA"))does retrieve the stored data.

but the quote means the data added cannot have any statements which must be interpreted, I can't use

Code: [Select]

(cons 1000 "This is a new thing!")and have it fly.

without the quote, it interprets -3 or NEWDATA as a command and fails.
with the quote, I have not found a way to interpret the list so it can pass variables.

there is something simple I am missing.
 

[gile]

Hi,

Code: [Select]

(list (list -3 (list "NEWDATA" (cons 1000 "This is a new thing"))))

[curmudgeon]

Yes, thank you very much.