[107998] branches/gsoc13-tests/tests/test

[marius at macports.org]

Revision: 107998
          https://trac.macports.org/changeset/107998
Author:   marius at macports.org
Date:     2013-07-10 09:57:46 -0700 (Wed, 10 Jul 2013)
Log Message:
-----------
statfile-unknown-ver: fixed error when running as root

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

Modified: branches/gsoc13-tests/tests/test/library.tcl
===================================================================
--- branches/gsoc13-tests/tests/test/library.tcl	2013-07-10 16:53:15 UTC (rev 107997)
+++ branches/gsoc13-tests/tests/test/library.tcl	2013-07-10 16:57:46 UTC (rev 107998)
@@ -172,6 +172,9 @@
     set args "destroot"
 
     file copy -force $path/statefile $work_dir/.macports.statefile-unknown-version.state
+    if { [exec whoami] == "root" } {
+        exec chown macports $work_dir/.macports.statefile-unknown-version.state
+    }
     set result [catch {eval exec $env $bindir$cmd $args >$output_file 2>@1} ]
 }
 

Modified: branches/gsoc13-tests/tests/test/statefile-unknown-version/test.tcl
===================================================================
--- branches/gsoc13-tests/tests/test/statefile-unknown-version/test.tcl	2013-07-10 16:53:15 UTC (rev 107997)
+++ branches/gsoc13-tests/tests/test/statefile-unknown-version/test.tcl	2013-07-10 16:57:46 UTC (rev 107998)
@@ -11,7 +11,6 @@
 set_dir
 port_index
 port_config $path
-file copy -force $path/statefile $work_dir/.macports.statefile-unknown-version.state
 port_desroot $path
 port_clean $path
 
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.macosforge.org/pipermail/macports-changes/attachments/20130710/38f2d484/attachment.html>