[107710] branches/gsoc13-tests/tests/test/variants

[marius at macports.org]

Revision: 107710
          https://trac.macports.org/changeset/107710
Author:   marius at macports.org
Date:     2013-07-04 08:25:20 -0700 (Thu, 04 Jul 2013)
Log Message:
-----------
Added variants test.

Added Paths:
-----------
    branches/gsoc13-tests/tests/test/variants/DESCRIPTION
    branches/gsoc13-tests/tests/test/variants/test.tcl

Removed Paths:
-------------
    branches/gsoc13-tests/tests/test/variants/master

Added: branches/gsoc13-tests/tests/test/variants/DESCRIPTION
===================================================================
--- branches/gsoc13-tests/tests/test/variants/DESCRIPTION	                        (rev 0)
+++ branches/gsoc13-tests/tests/test/variants/DESCRIPTION	2013-07-04 15:25:20 UTC (rev 107710)
@@ -0,0 +1,3 @@
+This test checks the variants feature in general.
+
+There is 1 test case.

Deleted: branches/gsoc13-tests/tests/test/variants/master
===================================================================
--- branches/gsoc13-tests/tests/test/variants/master	2013-07-04 15:03:06 UTC (rev 107709)
+++ branches/gsoc13-tests/tests/test/variants/master	2013-07-04 15:25:20 UTC (rev 107710)
@@ -1,8 +0,0 @@
-Utopia variant -- 2
-Utopia variant -- 2
---->  Fetching distfiles for variants
---->  Verifying checksums for variants
---->  Extracting variants
---->  Configuring variants
---->  Building variants
---->  Testing variants

Added: branches/gsoc13-tests/tests/test/variants/test.tcl
===================================================================
--- branches/gsoc13-tests/tests/test/variants/test.tcl	                        (rev 0)
+++ branches/gsoc13-tests/tests/test/variants/test.tcl	2013-07-04 15:25:20 UTC (rev 107710)
@@ -0,0 +1,27 @@
+package require tcltest 2
+namespace import tcltest::*
+
+source [file dirname $argv0]/../library.tcl
+set path [file dirname [file normalize $argv0]]
+
+initial_setup
+
+proc var_check {} {
+    global output_file
+    global path
+
+    set var "utopia variant*"
+    set line [get_line $path/$output_file $var]
+    return $line
+}
+
+
+test variants {
+    Regression test for variants.
+} -body {
+    var_check
+} -result "utopia variant -- 2"
+
+
+cleanup
+cleanupTests
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.macosforge.org/pipermail/macports-changes/attachments/20130704/5759478a/attachment.html>