Changeset 1ae5ad9 in tol

Timestamp:

Dec 27, 2011, 12:56:47 PM (15 years ago)

Author:

Pedro Gea <pgea@…>

Branches:

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

Children:

0422d20

Parents:

61b922e

Message:

Se incopora un miembro privado _Server para poder utilizar las funciones del módulo TolPackage::Server.
Refs #1371

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

File:

• tol/stdlib/general/TolPackage/builder.tol (modified) (4 diffs)

tol/stdlib/general/TolPackage/builder.tol

@@ -24 +24 @@
   Set _.sources = Copy(Empty);
   Set _.repositories = Copy(Empty);
+  NameBlock _Server = Server;
 
   ////////////////////////////////////////////////////////////////////////////
@@ -165 +166 @@
       Set If(FileExist(path<<package<<"/_pre_"<<package<<".tol"), 
         IncludeTOL(path<<package<<"/_pre_"<<package<<".tol"));
-      Text packageZip = Server::BuildPackage(package, path, 
+      Text packageZip = _Server::BuildPackage(package, path, 
         _.localPath, True);
       Real nErr2 = Copy(NError);
@@ -281 +282 @@
         Real If(mode==1, {
           Set names = Tokenizer(package.X.X, ".");
-          Real Server::RemovePackageVersion(names[1], 
+          Real _Server::RemovePackageVersion(names[1], 
             Eval(names[2]), Eval(names[3]), repository.db);
         1}, 0);
         // Se sube el paquete al repositorio
-        Real Server::UploadPackage(repository.db, packageZip);
+        Real _Server::UploadPackage(repository.db, packageZip);
         Real nErr3 = Copy(NError);
         If(nErr3>nErr2, { 
@@ -311 +312 @@
     0}, {
       Set names = Tokenizer(package.X.X, ".");
-      Real Server::RemovePackageVersion(names[1], 
+      Real _Server::RemovePackageVersion(names[1], 
         Eval(names[2]), Eval(names[3]), repository.db)
     })