Revision 9d929656 test/hs/Test/Ganeti/JQueue.hs

b/test/hs/Test/Ganeti/JQueue.hs
170 170
           let hs_sp = (jobStatusToRaw $ calcJobStatus job,
171 171
                        calcJobPriority job)
172 172
           in assertEqual ("Different result after encoding/decoding for " ++
173
                           show job) py_sp hs_sp
173
                           show job) hs_sp py_sp
174 174
        ) $ zip decoded jobs
175 175

  
176 176
-- | Tests listing of Job ids.

Also available in: Unified diff