[109852] branches/gsoc13-tests/src/macports1.0/tests/macports_dlist.test

[marius at macports.org]

Revision: 109852
          https://trac.macports.org/changeset/109852
Author:   marius at macports.org
Date:     2013-08-20 11:56:40 -0700 (Tue, 20 Aug 2013)
Log Message:
-----------
macports_dlist.test: fixed dlist_delete test

Modified Paths:
--------------
    branches/gsoc13-tests/src/macports1.0/tests/macports_dlist.test

Modified: branches/gsoc13-tests/src/macports1.0/tests/macports_dlist.test
===================================================================
--- branches/gsoc13-tests/src/macports1.0/tests/macports_dlist.test	2013-08-20 18:27:30 UTC (rev 109851)
+++ branches/gsoc13-tests/src/macports1.0/tests/macports_dlist.test	2013-08-20 18:56:40 UTC (rev 109852)
@@ -52,13 +52,19 @@
     Dlist delete unit test.
 } -setup {
     set mport [mportopen file://.]
+    set dlist [list]
+    lappend dlist $mport
 } -body {
-    #puts [ditem_key $mport provides]
-    #dlist_delete $mport provides
-    #puts [ditem_key $mport provides]
+    if {[dlist_delete dlist $mport] != ""} {
+	return "FAIL: cannot run dlist_delete"
+    }
+    if {$dlist != ""} {
+	return "FAIL: port not removed from list"
+    }
+    return "Dlist delete successful."
 } -cleanup {
     mportclose $mport
-} -result ""
+} -result "Dlist delete successful."
 
 
 test dlist_has_pending {
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.macosforge.org/pipermail/macports-changes/attachments/20130820/221504a5/attachment.html>