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

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

Revision: 6108
          http://oorexx.svn.sourceforge.net/oorexx/?rev=6108&view=rev
Author:   wdashley
Date:     2010-08-13 01:34:23 +0000 (Fri, 13 Aug 2010)

Log Message:
-----------
Update

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

Modified: websites/build/trunk/docroot/builds/scripts/virtrpmbuild.rex
===================================================================
--- websites/build/trunk/docroot/builds/scripts/virtrpmbuild.rex	2010-08-13 01:17:57 UTC (rev 6107)
+++ websites/build/trunk/docroot/builds/scripts/virtrpmbuild.rex	2010-08-13 01:34:23 UTC (rev 6108)
@@ -151,45 +151,24 @@
    'ssh da...@bu... "mkdir -p' newdir'"'
    if SysIsFileDirectory('./rpm/RPMS/i386') then do
       'scp ./rpm/RPMS/i386/ooRexx*.rpm da...@bu...:'newdir
-      if \self~checkbuild('i386', newdir) then do
-         self~log('Build was bad, no output files produced.')
-         end
       end
    else if SysIsFileDirectory('./rpm/RPMS/i486') then do
       'scp ./rpm/RPMS/i486/ooRexx*.rpm da...@bu...:'newdir
-      if \self~checkbuild('i486', newdir) then do
-         self~log('Build was bad, no output files produced.')
-         end
       end
    else if SysIsFileDirectory('./rpm/RPMS/i586') then do
       'scp ./rpm/RPMS/i586/ooRexx*.rpm da...@bu...:'newdir
-      if \self~checkbuild('i586', newdir) then do
-         self~log('Build was bad, no output files produced.')
-         end
       end
    else if SysIsFileDirectory('./rpm/RPMS/i686') then do
       'scp ./rpm/RPMS/i686/ooRexx*.rpm da...@bu...:'newdir
-      if \self~checkbuild('i686', newdir) then do
-         self~log('Build was bad, no output files produced.')
-         end
       end
    else if SysIsFileDirectory('./rpm/RPMS/x86_64') then do
       'scp ./rpm/RPMS/x86_64/ooRexx*.rpm da...@bu...:'newdir
-      if \self~checkbuild('x86_64', newdir) then do
-         self~log('Build was bad, no output files produced.')
-         end
       end
    else if SysIsFileDirectory('./rpm/RPMS/s390x') then do
       'scp ./rpm/RPMS/s390x/ooRexx*.rpm da...@bu...:'newdir
-      if \self~checkbuild('s390x', newdir) then do
-         self~log('Build was bad, no output files produced.')
-         end
       end
    else if SysIsFileDirectory('./rpm/RPMS/s390') then do
       'scp ./rpm/RPMS/s390/ooRexx*.rpm da...@bu...:'newdir
-      if \self~checkbuild('s390', newdir) then do
-         self~log('Build was bad, no output files produced.')
-         end
       end
    else nop -- it must not be a supported rpm type
    'scp' buildrpt 'da...@bu...:'newdir
@@ -207,17 +186,6 @@
 
 
 /*----------------------------------------------------------------------------*/
-/* Method: checkbuild                                                         */
-/*----------------------------------------------------------------------------*/
-
-::method checkbuild
-use strict arg arch, newdir
-call SysFileTree newdir'/ooRexx*'arch'*.rpm', 'files.', 'F'
-if files.0 = 0 then return .false  -- bad build
-return .true  -- good build
-
-
-/*----------------------------------------------------------------------------*/
 /* Method: targetexist                                                        */
 /*----------------------------------------------------------------------------*/
 


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