<pre style='margin:0'>
Rainer Müller (raimue) pushed a commit to branch master
in repository macports-base.

</pre>
<p><a href="https://github.com/macports/macports-base/commit/e97d916d4c2a6e8082db667256a84ba33d64c250">https://github.com/macports/macports-base/commit/e97d916d4c2a6e8082db667256a84ba33d64c250</a></p>
<pre style="white-space: pre; background: #F8F8F8"><span style='display:block; white-space:pre;color:#808000;'>commit e97d916d4c2a6e8082db667256a84ba33d64c250
</span>Author: Rainer Müller <raimue@macports.org>
AuthorDate: Thu Mar 15 17:03:32 2018 +0100

<span style='display:block; white-space:pre;color:#404040;'>    tests: Rewrite case-insensitive-deactivate
</span>---
 .../{Portfile.in => Portfile}                      |  2 +-
 tests/test/case-insensitive-deactivate/test.tcl    | 53 +++-------------------
 2 files changed, 8 insertions(+), 47 deletions(-)

<span style='display:block; white-space:pre;color:#808080;'>diff --git a/tests/test/case-insensitive-deactivate/Portfile.in b/tests/test/case-insensitive-deactivate/Portfile
</span>similarity index 94%
rename from tests/test/case-insensitive-deactivate/Portfile.in
rename to tests/test/case-insensitive-deactivate/Portfile
<span style='display:block; white-space:pre;color:#808080;'>index d928b8b..9054480 100644
</span><span style='display:block; white-space:pre;background:#e0e0ff;'>--- a/tests/test/case-insensitive-deactivate/Portfile.in
</span><span style='display:block; white-space:pre;background:#e0e0ff;'>+++ b/tests/test/case-insensitive-deactivate/Portfile
</span><span style='display:block; white-space:pre;background:#e0e0e0;'>@@ -1,6 +1,6 @@
</span> PortSystem 1.0
 
<span style='display:block; white-space:pre;background:#ffe0e0;'>-name            @name@
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+name               casesensitive
</span> version           1
 categories     test
 maintainers    raimue
<span style='display:block; white-space:pre;color:#808080;'>diff --git a/tests/test/case-insensitive-deactivate/test.tcl b/tests/test/case-insensitive-deactivate/test.tcl
</span><span style='display:block; white-space:pre;color:#808080;'>index 112c308..1118fcf 100644
</span><span style='display:block; white-space:pre;background:#e0e0ff;'>--- a/tests/test/case-insensitive-deactivate/test.tcl
</span><span style='display:block; white-space:pre;background:#e0e0ff;'>+++ b/tests/test/case-insensitive-deactivate/test.tcl
</span><span style='display:block; white-space:pre;background:#e0e0e0;'>@@ -3,59 +3,20 @@ namespace import tcltest::*
</span> 
 source [file dirname $argv0]/../library.tcl
 
<span style='display:block; white-space:pre;background:#ffe0e0;'>-makeFile "" "Portfile"
</span> makeFile "" $output_file
 makeDirectory $work_dir
 set path [file dirname [file normalize $argv0]]
 
<span style='display:block; white-space:pre;background:#ffe0e0;'>-set testfile "/tmp/macports-tests/opt/local/var/test/case"
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>-set testport1 "casesensitive"
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>-set testport2 "CaseSensitivE"
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+initial_setup
</span> 
<span style='display:block; white-space:pre;background:#ffe0e0;'>-load_variables $path
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>-set_dir
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>-port_index
</span> 
<span style='display:block; white-space:pre;background:#ffe0e0;'>-proc test_exists {} {
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>-    global path testfile testport1
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>-
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>-    exec -ignorestderr sed "s/@name@/$testport1/" $path/Portfile.in > Portfile
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>-    port_install
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>-
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>-    if {[file exists $testfile]} {
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>-        return "Port installed."
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>-    } else {
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>-        return "File missing."
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>-    }
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>-}
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>-
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>-proc test_not_exists {} {
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>-    global path testfile testport2
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>-
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>-    exec -ignorestderr sed "s/@name@/$testport2/" $path/Portfile.in > Portfile
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>-    port_uninstall
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>-
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>-    if {[file exists $testfile]} {
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>-        return "File still exists."
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>-    } else {
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>-        return "Port uninstalled."
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>-    }
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>-}
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>-
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>-
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>-# Test cases.
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>-test file_installed {
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>-    Regression test for file installed correctly.
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+# Test cases
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+test case_insensitive_uninstall {
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+    Regression test for case-insensitive port name uninstall
</span> } -body {
<span style='display:block; white-space:pre;background:#ffe0e0;'>-    test_exists
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>-} -result "Port installed."
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>-
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>-test file_uninstalled {
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>-    Regression test for file uninstalled correctly.
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>-} -body {
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>-    test_not_exists
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>-} -result "Port uninstalled."
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>-
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+    port_install casesensitive
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+    return [port_uninstall CaseSensitivE]
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+} -result 0
</span> 
 cleanup
 cleanupTests
</pre><pre style='margin:0'>

</pre>