[Pkg-haskell-commits] darcs: tools: Fix ./haskell-pkg-debcheck.hs warnings

[Joachim Breitner]

Sun Nov 10 19:36:00 UTC 2013  Joachim Breitner <mail at joachim-breitner.de>
  * Fix ./haskell-pkg-debcheck.hs warnings

    M ./haskell-pkg-debcheck.hs -3 +3

Sun Nov 10 19:36:00 UTC 2013  Joachim Breitner <mail at joachim-breitner.de>
  * Fix ./haskell-pkg-debcheck.hs warnings
diff -rN -u old-tools/haskell-pkg-debcheck.hs new-tools/haskell-pkg-debcheck.hs
--- old-tools/haskell-pkg-debcheck.hs	2013-11-22 11:42:27.121717643 +0000
+++ new-tools/haskell-pkg-debcheck.hs	2013-11-22 11:42:27.173717651 +0000
@@ -249,11 +249,11 @@
             unless (st `elem` ["Failed-Removed", "Not-For-Us"]) $ 
                 trace (printf "Version difference for %s on %s in state %s: \
                               \wb knows %s and Sources knows %s"
-                      (show s)
+                      (show (pretty s))
                       arch
                       st
-                      (show v)
-                      (show (siVersion (sourcesMap ! s)))) $
+                      (show (prettyDebianVersion v))
+                      (show (prettyDebianVersion (siVersion (sourcesMap ! s))))) $
             return ()
         guard (v == siVersion (sourcesMap ! s))
         dw <- (