diff --git a/htest/Test/Ganeti/TestCommon.hs b/htest/Test/Ganeti/TestCommon.hs
index 38f9953a28c4a8c0ce2645b3f186c4ea0b141c59..fdfa7f128eafe9c65e1275a5ae32ac8008de25ef 100644
--- a/htest/Test/Ganeti/TestCommon.hs
+++ b/htest/Test/Ganeti/TestCommon.hs
@@ -78,7 +78,7 @@ maxOpCodes = 16
 (==?) :: (Show a, Eq a) => a -> a -> Property
 (==?) x y = printTestCase
             ("Expected equality, but got mismatch\nexpected: " ++
-             show x ++ "\n but got: " ++ show y) (x == y)
+             show y ++ "\n but got: " ++ show x) (x == y)
 infix 3 ==?
 
 -- | Checks for inequality with proper annotation. The first argument