Been working on this for a minute today, can't figure out how to use assoc code 1 from mtext for assoc code 304 for mleaders. Anyone know?
(defun C:MTxt2Mleader ()
(setq ent (entget (car (entsel "\nSelect SOURCE text: "))))
(setq info (assoc 1 ent))
(setvar "cmdecho" 0)
(while
(setq ent2 (entget (car (entsel "\nSelect MLEADER object: "))))
(SETQ mlinfo (assoc 304 ent2))
(setq ent2 (subst (assoc 304 INFO) (assoc 304 ent2) ent2))
(entmod ent2)
(setvar "cmdecho" 1)
);end while
);end of defun
Returns:
; error: bad association list: (1 . "SAMPLE TEXT")