From 45a3cd7cecf62d000b28ae355a5b0743fc55414c Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?=D0=94=D0=BC=D0=B8=D1=82=D1=80=D0=BE=D0=B2=D0=B8=D1=87=20?=
 =?UTF-8?q?=D0=9E=D0=BB=D0=B5=D0=B3?= <doublefint@gmail.com>
Date: Thu, 24 Nov 2016 20:33:11 +0300
Subject: [PATCH] delete code before load in sc.all.sub for importUpdated

---
 sc.all.sub.cls | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/sc.all.sub.cls b/sc.all.sub.cls
index 6647c62..f2bd9d4 100644
--- a/sc.all.sub.cls
+++ b/sc.all.sub.cls
@@ -79,6 +79,8 @@ ClassMethod importUpdated(qspec = "cku-d", ByRef err = "", recurse = 1, ByRef lo
 		   
 		   } else {
 			   
+			   #; drop existing code before import ( purge DateModified )
+			   s:codets'="" sc = ##class(%RoutineMgr).Delete( codename )
 			   s sc = $system.OBJ.Load( filename, qspec, .err, .loaded)
 			   
 		   }