Does anyone have a way to save in two directories in one step? Thanks
This is a good starting point: (defun C:save2 (/ fd firstdir seconddir) (setq fd (getvar "filedia")) (setq firstdir (getstring "\nEnter First Path and Filename: ")) (setq seconddir (getstring "\nEnter Second Path and Filename: ")) (setvar "filedia" 0) (vl-cmdf "saveas" "" firstdir ) (vl-cmdf "saveas" "" seconddir ) (setvar "filedia" fd) (princ) ) With a little more work dialog can be included, the current filename can be used etc. John