[136512] trunk/base/src/macports1.0/tests/macports.test

jmr at macports.org jmr at macports.org
Tue May 19 19:44:11 PDT 2015


Revision: 136512
          https://trac.macports.org/changeset/136512
Author:   jmr at macports.org
Date:     2015-05-19 19:44:11 -0700 (Tue, 19 May 2015)
Log Message:
-----------
fix getportdir test

Modified Paths:
--------------
    trunk/base/src/macports1.0/tests/macports.test

Modified: trunk/base/src/macports1.0/tests/macports.test
===================================================================
--- trunk/base/src/macports1.0/tests/macports.test	2015-05-20 02:21:54 UTC (rev 136511)
+++ trunk/base/src/macports1.0/tests/macports.test	2015-05-20 02:44:11 UTC (rev 136512)
@@ -596,13 +596,16 @@
 } -body {
     set url http://packages.macports.org/db_select/db_select-0.1_2.darwin_13.noarch.tbz2
     set res [macports::getportdir $url]
-    if {$res ne "${pwd}/portdbpath/portdirs/db_select-0.1_2"} {
-	return "FAIL: invalid port directory"
+    set expected ${pwd}/portdbpath/portdirs/db_select-0.1_2
+    if {$res ne $expected} {
+	    return "FAIL: incorrect port directory $res (expected $expected)"
     }
 
     set url file://${pwd}/local_file
-    if {[macports::getportdir $url] ne "${pwd}/local_file"} {
-	return "FAIL: invalid local port directory"
+    set res [macports::getportdir $url]
+    set expected ${pwd}/portdbpath/portdirs/local_file
+    if {$res ne $expected} {
+	    return "FAIL: incorrect local port directory $res (expected $expected)"
     }
     return "Get port dir successful."
 } -cleanup {
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <https://lists.macosforge.org/pipermail/macports-changes/attachments/20150519/601aeb2c/attachment.html>


More information about the macports-changes mailing list