Maybe it's very simple but... With this function:
(defun C:DclUtils ( / Dcl_Id WhtNxt)
(setq Dcl_Id (load_dialog "DclUtils.dcl"))
(if (or (minusp Dcl_Id) (not (new_dialog "DclUtils" Dcl_Id))) (exit))
(action_tile "accept" "(done_dialog 0)")
(action_tile "Program01" "(done_dialog 1)")
(action_tile "Program02" "(done_dialog 2)")
(setq WhtNxt (start_dialog))
(cond
( (= 1 WhtNxt) (C:Foo1) )
( (= 2 WhtNxt) (C:Foo2) )
)
(unload_dialog Dcl_Id)
(princ)
)
after the execution of the C:Foo1 or C:Foo2 commands if I press enter I re-launch the command C:DclUtils. Is there a way that pressing enter will launch the last command executed (C:Foo1 or C:Foo2) within C:DclUtils?