to installedtools? announce [Tools have been integrated correctly.] end object "html to mwhtml :name let [addr " w askr-current-project [nth 0 :] h askr-current-project [nth 1 :]] hprint "|| hprint "|| hprint "|| hinsert "|| hinsert askr-current-project [:<name>] hinsert "|| hprint "|| hprint "|| hprint "|
| hinsert "|| hinsert "| | hinsert "| | hprint "|| hprint "|| hprint "|
| hprint "|| hprint "|| toolbox [let [err savehtml :name :addr] if not eq 0 :err [! do-alert 1 rthing stringrecord "errsbf006 :err] ! NavCompleteSave :NavReply 0 ! NavDisposeReply :NavReply db sum 2 :NavReply 0 ] end