Changeset b7f622d in tol

Timestamp:

Jun 15, 2010, 1:13:22 PM (16 years ago)

Author:

Víctor de Buen <vdebuen@…>

Branches:

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

Children:

e8e2cd8

Parents:

e68d611

Message:

Nuevo método Upgrade.AllInAll

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

Location:

tol/stdlib/general/TolPackage

Files:

• repository.tol (modified) (2 diffs)
• tools.tol (modified) (2 diffs)

tol/stdlib/general/TolPackage/repository.tol

@@ -249 +249 @@
 //////////////////////////////////////////////////////////////////////////////
 Text _.autodoc.member.Upgrade.All = 
-"Actualiza automáticamentetodos los paquetes disponibles en un repositorio "
+"Actualiza automáticamente todos los paquetes disponibles en un repositorio "
 "remoto para los que la copia local haya caducado.";
 Real Upgrade.All(Real caducityInDays)
@@ -256 +256 @@
   SetSum(EvalSet(_.status, Real(@PackageInfo pi)
   {
-    Upgrade(pi->name.version)
+    Upgrade(pi->name.version, caducityInDays)
+  }))
+};
+
+//////////////////////////////////////////////////////////////////////////////
+Text _.autodoc.member.Upgrade.AllInAll = 
+"Actualiza automáticamente todos los paquetes disponibles en todos los "
+"repositorios remotos consultados para los que la copia local haya caducado.";
+Static Real Upgrade.AllInAll(Real caducityInDays)
+//////////////////////////////////////////////////////////////////////////////
+{
+  SetSum(EvalSet(@Repository::_.instances, Real(@Repository r)
+  {
+    r::Upgrade.All(caducityInDays)
   }))
 };

tol/stdlib/general/TolPackage/tools.tol

@@ -81 +81 @@
 //////////////////////////////////////////////////////////////////////////////
 Text _.autodoc.member.Upgrade.All = 
-"Actualiza automáticamentetodos los paquetes disponibles en un repositorio "
+"Actualiza automáticamente todos los paquetes disponibles en un repositorio "
 "remoto para los que la copia local haya caducado.";
 Real Upgrade.All(Text remote.repository, Real caducityInDays)
@@ -88 +88 @@
   @Repository r = @Repository::Get(remote.repository);
   r::Upgrade.All(caducityInDays)
+};
+
+//////////////////////////////////////////////////////////////////////////////
+Text _.autodoc.member.Upgrade.AllInAll = 
+"Actualiza automáticamente todos los paquetes disponibles en todos los "
+"repositorios remotos consultados para los que la copia local haya caducado.";
+Real Upgrade.AllInAll(Real caducityInDays)
+//////////////////////////////////////////////////////////////////////////////
+{
+  @Repository::Upgrade.AllInAll(caducityInDays)
 };