[commit: packages/haskeline] master: Untabify and delete trailing whitespace (5c0e6dc)

git at git.haskell.org git at git.haskell.org
Fri Dec 18 09:48:26 UTC 2015


Repository : ssh://git@git.haskell.org/haskeline

On branch  : master
Link       : http://git.haskell.org/packages/haskeline.git/commitdiff/5c0e6dcfcdb11c6ece244c99eaca7b138a49f4a3

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

commit 5c0e6dcfcdb11c6ece244c99eaca7b138a49f4a3
Author: Herbert Valerio Riedel <hvr at gnu.org>
Date:   Fri Dec 18 08:54:18 2015 +0100

    Untabify and delete trailing whitespace
    
    This makes haskeline `-Wtabs`-clean


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

5c0e6dcfcdb11c6ece244c99eaca7b138a49f4a3
 System/Console/Haskeline/Command/Completion.hs | 4 +---
 1 file changed, 1 insertion(+), 3 deletions(-)

diff --git a/System/Console/Haskeline/Command/Completion.hs b/System/Console/Haskeline/Command/Completion.hs
index 97a887b..71a0f12 100644
--- a/System/Console/Haskeline/Command/Completion.hs
+++ b/System/Console/Haskeline/Command/Completion.hs
@@ -134,7 +134,7 @@ padWords :: Int -> [String] -> String
 padWords _ [x] = x
 padWords _ [] = ""
 padWords len (x:xs) = x ++ replicate (len - glength x) ' '
-			++ padWords len xs
+                        ++ padWords len xs
     where
         -- kludge: compute the length in graphemes, not chars.
         -- but don't use graphemes for the max length, since I'm not convinced
@@ -159,5 +159,3 @@ splitIntoGroups n xs = transpose $ unfoldr f xs
 ceilDiv :: Integral a => a -> a -> a
 ceilDiv m n | m `rem` n == 0    =  m `div` n
             | otherwise         =  m `div` n + 1
-
-



More information about the ghc-commits mailing list