From 95e3c7b0e5f38e2fc4a2bf797bd0b95935b9b4c3 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Hugo=20H=C3=B6rnquist?= <hugo@hornquist.se>
Date: Tue, 23 Apr 2019 18:05:26 +0200
Subject: Fix failing test.

---
 tests/prop.scm | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

diff --git a/tests/prop.scm b/tests/prop.scm
index 64304301..15ccb355 100644
--- a/tests/prop.scm
+++ b/tests/prop.scm
@@ -1,4 +1,5 @@
-(use-modules (vcomponent))
+(use-modules (vcomponent)
+             (util))
 
 (define v (make-vcomponent
            (string-append (getenv "TESTPATH")
@@ -8,4 +9,6 @@
 (test-equal '("2") (prop (attr* v 'KEY) 'B))
 (test-equal #f (prop (attr* v 'KEY) 'C))
 
-(test-equal '(A B) (map car (properties (attr* v 'KEY))))
+(test-equal '(A B) (sort* (map car (properties (attr* v 'KEY)))
+                          string<?
+                          symbol->string))
-- 
cgit v1.2.3