Nightly update (ISO SHA-1 ac7be1d)

TempleOSCD/Adam/ADefine.HC

@@ -18,8 +18,8 @@ U0 LoadDocDefines()
   //$LK,"DD_BOOT_HIGH_LOC_DVD",A="FF:::/Adam/Opt/Boot/BootDVD.HC,DD_BOOT_HIGH_LOC_DVD"$
 
   $TR-C,"LineRep"$
-$ID,4$DefinePrint("DD_TEMPLEOS_LOC","119,822");
-DefinePrint("DD_TEMPLEOS_LOC_OFFICIAL","81,987");
+$ID,4$DefinePrint("DD_TEMPLEOS_LOC","119,873");
+DefinePrint("DD_TEMPLEOS_LOC_OFFICIAL","81,990");
 $ID,-4$
   DefinePrint("DD_MP_VECT","%08X",MP_VECT_ADDR);
   DefinePrint("DD_MP_VECT_END","%08X",

TempleOSCD/Adam/AutoComplete/ACTask.HC

@@ -222,8 +222,7 @@ U0 ACTask(I64)
   LBts(&Fs->display_flags,DISPLAYf_SHOW);
   WinHorz(51,Fs->win_right);
   LBts(&Fs->display_flags,DISPLAYf_WIN_ON_TOP);
-  Fs->win_inhibit=WIG_TASK_DFT-WIF_SELF_BORDER
-	-WIF_SELF_MS_L-WIF_SELF_MS_R-WIG_DBL_CLICK;
+  Fs->win_inhibit=WIG_NO_FOCUS_TASK_DFT;
   Free(ac.cur_word);
   ac.cur_word=NULL;
   while (TRUE) {

TempleOSCD/Adam/DolDoc/DocPopUp.HC

@@ -8,22 +8,16 @@ public CTask *PopUpViewDoc(CDoc *doc,I64 dof_flags=0)
   return task;
 }
 
-U0 PopUpViewPrintEndCB()
-{
-  DocDel(FramePtr("ViewStrFrame"));
-  Exit;
-}
-
 public CTask *PopUpViewPrint(U8 *fmt,...)
 {//View Print stmt in PopUp win task.
-  CTask *task;
+  CTask *task=Spawn(&SrvCmdLine,NULL,"View",,Fs);
   U8 *buf=StrPrintJoin(NULL,fmt,argc,argv);
-  CDoc *doc=DocNew;
+  CDoc *doc=DocNew(,task);
   DocPrint(doc,buf);
   Free(buf);
-  task=PopUpViewDoc(doc);
-  FramePtrAdd("ViewStrFrame",doc,task);
-  task->task_end_cb=&PopUpViewPrintEndCB;
+  buf=MStrPrint("DocEd(0x%X);",doc);
+  TaskExe(task,NULL,buf,1<<JOBf_EXIT_ON_COMPLETE|1<<JOBf_FREE_ON_COMPLETE);
+  Free(buf);
   return task;
 }
 

TempleOSCD/Adam/God/HolySpirit.HC

@@ -135,6 +135,14 @@ public I64 GodInit(U8 *files_find_mask="/Adam/God/Vocab.DD*",U8 *fu_flags=NULL)
   return god.num_words;
 } GodInit;
 
+public U8 *GodWordStr(I64 bits=17)
+{//Make God pick a word. $LK+PU,"Holy Spirit Instructions",A="FI:::/Adam/God/HSNotes.DD"$
+  if (god.num_words)
+    return god.words[GodBits(bits)%god.num_words];
+  else
+    return NULL;
+}
+
 public U0 GodWord(I64 bits=17,Bool show_num=FALSE)
 {//Make God pick a word. $LK+PU,"Holy Spirit Instructions",A="FI:::/Adam/God/HSNotes.DD"$
   I64 i;

TempleOSCD/Adam/Win.HC

@@ -343,6 +343,7 @@ ext[EXT_WIN_TO_TOP]=&WinToTop;
 
 public CTask *WinFocus(CTask *task=NULL)
 {//Set task as focus task.
+  if (!task) task=Fs;
   PUSHFD
   CLI
   if (!TaskValidate(task)||Bt(&task->win_inhibit,WIf_SELF_FOCUS))