Index: svn/StudioHook.cls.xml
===================================================================
diff -u -r1570 -r1572
--- svn/StudioHook.cls.xml (.../StudioHook.cls.xml) (revision 1570)
+++ svn/StudioHook.cls.xml (.../StudioHook.cls.xml) (revision 1572)
@@ -1039,8 +1039,8 @@
InternalName:%String
%Status
@@ -1051,14 +1051,28 @@
set Status = $$$OK
if $IsObject(Object) {
- set ExternalName=..svnHelper.GeefRepository(InternalName).ExternalName(InternalName)
- Set Status = ##class(svn.SourceCodeInfo).Create(InternalName,ExternalName)
+ Set Status = ..SourceCodeInfoUpdate(InternalName)
}
quit Status
]]>
+
+InternalName:%String
+%Status
+
+
+