(testsuite) Make expected lists unique

test/lib/library.exp

@@ -371,7 +371,7 @@ proc get_hosts {} {
     if {[llength $avahi_hosts] > 0} {
         lappend hosts $avahi_hosts
     }; # if
-    return $hosts
+    return [lsort -unique $hosts]
 }; # get_hosts()
 
 
@@ -416,7 +416,7 @@ proc get_signals {} {
 # @param integer $size  Chunk size
 # @result boolean  True if successful, False if not
 proc match_items {items test {size 20}} {
-    set items [exec sort << [join $items "\n"]]
+    set items [exec sort | uniq << [join $items "\n"]]
     set result false
     for {set i 0} {$i < [llength $items]} {set i [expr {$i + $size}]} {
         set expected ""