move ew_safe_close and tw_safe_close calls in BringProjectUptoDate

to callers

Ide/IDE.icl

@@ -1162,6 +1162,8 @@ pinit force_update proj proj_path ps
 	# ps = setProject proj ps
 	# ps = setPath proj_path ps
 	# ps = selectProjectTarget getTargets ps
+	# ps = ew_safe_close ps							// close error window
+	# ps = tw_safe_close ps							// close types window
 	# ps = BringProjectUptoDate force_update cleanup ps
 	= ps
 where

Ide/projwin.icl

@@ -713,7 +713,7 @@ where
 
 pm_upto :: !Bool !*(PSt *General) -> *PSt *General;
 pm_upto force ps
-	# ps = ed_ask_save_all False True (enableProjectMenu o BringProjectUptoDate force cont o disableProjectMenu) ps
+	# ps = ed_ask_save_all False True (enableProjectMenu o bring_project_upto_date force cont o disableProjectMenu) ps
 	= mb_update_undoinfo ps
 where
 	cont path linked ok ps
@@ -723,7 +723,7 @@ where
 
 pm_exec :: !*(PSt *General) -> *PSt *General;
 pm_exec ps
-	# ps = ed_ask_save_all False True (enableProjectMenu o BringProjectUptoDate False cont o disableProjectMenu) ps
+	# ps = ed_ask_save_all False True (enableProjectMenu o bring_project_upto_date False cont o disableProjectMenu) ps
 	= mb_update_undoinfo ps
 where
 	cont execpath linked ok ps
@@ -753,6 +753,13 @@ pm_run ps
 		= RunProgram execpath ps
 	= RunProgram execpath ps
 
+
+bring_project_upto_date :: !Bool CleanupCont !*(PSt *General) -> *PSt *General
+bring_project_upto_date force continuation ps
+	#	ps				= ew_safe_close ps							// close error window
+	#	ps				= tw_safe_close ps							// close types window
+	= BringProjectUptoDate force continuation ps
+
 //--
 
 disableProjectMenu ps

Pm/PmDriver.icl

@@ -8,9 +8,9 @@ import UtilNewlinesFile, UtilIO
 
 import IdeState
 
-from typewin import updateTypeWindow, tw_safe_close, class Typer, :: TypeWinInfo
+from typewin import updateTypeWindow, class Typer, :: TypeWinInfo
 from typeatt import typeWinKeyboard, typeWinMouse
-from errwin  import updateErrorWindow, ew_safe_close
+from errwin  import updateErrorWindow
 from messwin import showInfo, :: InfoMessage(..)
 from projwin import pm_update_project_window
 
@@ -139,9 +139,6 @@ BringProjectUptoDate :: !Bool CleanupCont !*GeneralSt -> *GeneralSt
 BringProjectUptoDate force continuation ps
 	#  (project,ps)		= getProject ps
 
-	#	ps				= ew_safe_close ps							// close error window
-	#	ps				= tw_safe_close ps							// close types window
-
 	#	ps				= PrecompileFase project ps
 
 	#	ps				= showInfo (Level1 "Bring up to date...") ps