[Oorexx-svn] SF.net SVN: oorexx:[6222] websites/build/trunk/docroot/builds/scripts/ buildall.rex

[<wda...@us...>]

Revision: 6222
          http://oorexx.svn.sourceforge.net/oorexx/?rev=6222&view=rev
Author:   wdashley
Date:     2010-09-23 15:23:14 +0000 (Thu, 23 Sep 2010)

Log Message:
-----------
Allow buildall.rex to build both trunk and branches.

Modified Paths:
--------------
    websites/build/trunk/docroot/builds/scripts/buildall.rex

Modified: websites/build/trunk/docroot/builds/scripts/buildall.rex
===================================================================
--- websites/build/trunk/docroot/builds/scripts/buildall.rex	2010-09-23 14:41:09 UTC (rev 6221)
+++ websites/build/trunk/docroot/builds/scripts/buildall.rex	2010-09-23 15:23:14 UTC (rev 6222)
@@ -55,9 +55,11 @@
    buildarr~append(.buildmachine~new(osname, addr, userid, cmd, virt_flag))
    end
 
+cmdargs = arg(1)~strip()
+
 -- do all the virtual builds
 do machine over buildarr
-   machine~do_build()
+   machine~do_build(cmdargs)
    end
 return
 
@@ -83,6 +85,7 @@
 return
 
 ::method do_build
+use strict arg cmdargs
 expose osname addr userid cmd virt_flag
 if virt_flag = .true then do
    -- start the domain
@@ -91,7 +94,9 @@
    if retc <> 0 then return
    call SysSleep 90  -- allow some time for the domain to fully start
    end
-'ssh' userid'@'addr '"'cmd'"'
+if cmdargs = '' then cmdline = cmd
+else cmdline = cmd cmdargs
+'ssh' userid'@'addr '"'cmdline'"'
 if virt_flag = .true then do
    retc = domain~shutdown()
    call SysSleep 90  -- allow some time for the domain to fully stop


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.