diff --git a/HsColour.hs b/HsColour.hs
--- a/HsColour.hs
+++ b/HsColour.hs
@@ -20,7 +20,8 @@
 import System.IO (hSetEncoding, utf8)
 #endif
 
-version = show MAJOR.MINOR
+version :: String
+version = show MAJOR ++"."++show MINOR
 
 optionTable :: [(String,Option)]
 optionTable = [ ("help",    Help)
@@ -84,7 +85,7 @@
   ioWrapper (HSColour.hscolour output pref anchors partial title)
 
   where
-    writeResult outF s = do if null outF then putStr s
+    writeResult outF s = do if null outF then putStrLn s
                                          else writeUTF8File (last outF) s
                             exitSuccess
     fileInteract out ann inFs u 
diff --git a/Language/Haskell/HsColour/Anchors.hs b/Language/Haskell/HsColour/Anchors.hs
--- a/Language/Haskell/HsColour/Anchors.hs
+++ b/Language/Haskell/HsColour/Anchors.hs
@@ -140,6 +140,7 @@
 context ::  [(TokenType, String)] -> [(TokenType, String)]
 context stream@((Keyglyph,"="):_) = stream
 context stream@((Keyglyph,"=>"):_) = stream
+context stream@((Keyglyph,"⇒"):_) = stream
 context (_:stream) = context stream
 context [] = []
 
diff --git a/hscolour.cabal b/hscolour.cabal
--- a/hscolour.cabal
+++ b/hscolour.cabal
@@ -1,5 +1,5 @@
 Name: hscolour
-Version: 1.20.1
+Version: 1.20.2
 Copyright: 2003-2012 Malcolm Wallace; 2006 Bjorn Bringert
 Maintainer: Malcolm Wallace
 Author: Malcolm Wallace