Changeset 0f8f0fa in tol

Timestamp:

Nov 27, 2009, 12:20:56 PM (17 years ago)

Author:

Víctor de Buen <vdebuen@…>

Branches:

1941-docker-image-to-test, devel, master

Children:

972bf92

Parents:

c75074c

Message:

Ensuring requirements in package order creation

git-svn-id: ​https://www.tol-project.org/svn/tolp/trunk@1740 be4846ae-f051-483a-831f-b64e7d08527f

File:

• tol_pkg/_uploader.tol (modified) (5 diffs)

tol_pkg/_uploader.tol

@@ -12 +12 @@
 Text version = Replace(Tokenizer(Version," ")[1],".","_");
 Text upload = tolpkg+"tol_pkg/"+version;
+Text tolpkg_install = Replace(TolAppDataPath+
+  "OIS/Require/tol_pkg/"+version+"/","\\","/");
+
+Real OSDirRemove(tolpkg_install);
+Real OSDirMake(tolpkg_install);
 Real OSDirRemove(tolpkg);
+Real OSDirMake(tolpkg);
+Real OSDirMake(upload);
 
 Real OSCmdWaitWr(Text order)
@@ -23 +30 @@
   "https://www.tol-project.org/svn/tolp/trunk/tol_pkg \""+export+"\"");
 
+
 Set packages = 
+[[
+  "HashMap",
+  "MatQuery",
+  "MatEncode",
+  "MulVarFunAprox",
+  "MhCnstrLinRegArima",
+  "GraphTools",
+  "GisTools"
+]];
+/*
 {
   Set aux = Select(GetDir(export)[2], Real(Text subDir)
@@ -35 +53 @@
   Sort(aux,Real(Text a, Text b) { Compare(a,b) })
 };
+*/
   
 Text SetOfTextToWikiList(Set set, Text margin, Text quote)
@@ -45 +64 @@
 };
 
-Real OSDirMake(upload);
 
 Real wiki = FOpen(tolpkg+"wiki.txt","wb");
@@ -76 +94 @@
 ");
   Real Ois.Store(aux[1],upl+".oza");
+  Real OSCmdWaitWr("cp "+upl+".oza \""+ReplaceSlash(tolpkg_install)+"\"");
   Real OSCmdWaitWr("\""+tolpkg+"compress.bat\" "+name)
 });