[107994] branches/gsoc13-tests/tests/test/library.tcl

marius at macports.org marius at macports.org
Wed Jul 10 09:24:19 PDT 2013


Revision: 107994
          https://trac.macports.org/changeset/107994
Author:   marius at macports.org
Date:     2013-07-10 09:24:19 -0700 (Wed, 10 Jul 2013)
Log Message:
-----------
Added error catch for all procs in library.

Modified Paths:
--------------
    branches/gsoc13-tests/tests/test/library.tcl

Modified: branches/gsoc13-tests/tests/test/library.tcl
===================================================================
--- branches/gsoc13-tests/tests/test/library.tcl	2013-07-10 15:58:41 UTC (rev 107993)
+++ branches/gsoc13-tests/tests/test/library.tcl	2013-07-10 16:24:19 UTC (rev 107994)
@@ -92,7 +92,7 @@
     set cmd "port"
     set args "clean"
 
-    set result [eval exec $env $bindir$cmd $args 2>@1]
+    set result [catch {eval exec $env $bindir$cmd $args 2>@1} ]
     cd $back
 }
 
@@ -143,7 +143,7 @@
     set cmd "port"
     set args "install"
 
-    set result [eval exec $env $bindir$cmd $args > output 2>@1]
+    set result [catch {eval exec $env $bindir$cmd $args > output 2>@1} ]
 }
 
 # Run configure command.
@@ -156,7 +156,7 @@
     set cmd "port"
     set args "configure"
 
-    set result [eval exec $env $bindir$cmd $args 2>@1]
+    set result [catch {eval exec $env $bindir$cmd $args 2>@1} ]
 }
 
 # Run desroot command.
@@ -172,7 +172,7 @@
     set args "destroot"
 
     file copy -force $path/statefile $work_dir/.macports.statefile-unknown-version.state
-    set result [eval exec $env $bindir$cmd $args >$output_file 2>@1]
+    set result [catch {eval exec $env $bindir$cmd $args >$output_file 2>@1} ]
 }
 
 # Uninstalls portfile.
@@ -184,7 +184,7 @@
     set cmd "port"
     set args "uninstall"
 
-    set result [eval exec $env $bindir$cmd $args > output 2>@1]
+    set result [catch {eval exec $env $bindir$cmd $args > output 2>@1} ]
 }
 
 # Returns the line containint a given string
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.macosforge.org/pipermail/macports-changes/attachments/20130710/4ab81366/attachment.html>


More information about the macports-changes mailing list