diff --git a/rhodecode/public/js/mode/haskell/index.html b/rhodecode/public/js/mode/haskell/index.html
--- a/rhodecode/public/js/mode/haskell/index.html
+++ b/rhodecode/public/js/mode/haskell/index.html
@@ -44,7 +44,7 @@ permBag bs = concatMap (\(f,cs) -> map (
     oneOfEach (an@(a,n):bs) =
         let bs' = if n == 1 then bs else (a,n-1):bs
         in (a,bs') : mapSnd (an:) (oneOfEach bs)
-    
+
     apSnd f (a,b) = (a, f b)
     mapSnd = map . apSnd
 </textarea></form>