Repository : ssh://darcs.haskell.org//srv/darcs/packages/containers

On branch  : master

http://hackage.haskell.org/trac/ghc/changeset/0928ff026a70b759be060f6ea46a48c58957049c

>---------------------------------------------------------------

commit 0928ff026a70b759be060f6ea46a48c58957049c
Author: Milan Straka <[email protected]>
Date:   Sat Apr 21 21:37:14 2012 +0200

    Insert missing space in an error message.

>---------------------------------------------------------------

 Data/IntMap/Base.hs |    2 +-
 1 files changed, 1 insertions(+), 1 deletions(-)

diff --git a/Data/IntMap/Base.hs b/Data/IntMap/Base.hs
index 6980a6e..d147d59 100644
--- a/Data/IntMap/Base.hs
+++ b/Data/IntMap/Base.hs
@@ -409,7 +409,7 @@ find k = k `seq` go
                   | otherwise = not_found
     go Nil = not_found
 
-    not_found = error ("IntMap.!: key" ++ show k ++ " is not an element of the 
map")
+    not_found = error ("IntMap.!: key " ++ show k ++ " is not an element of 
the map")
 
 -- | /O(min(n,W))/. The expression @('findWithDefault' def k map)@
 -- returns the value at key @k@ or returns @def@ when the key is not an



_______________________________________________
Cvs-libraries mailing list
[email protected]
http://www.haskell.org/mailman/listinfo/cvs-libraries

Reply via email to