diff options
| author |  Joey Hess <joey@kitenet.net> | 2011-03-12 15:30:17 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2011-03-12 15:30:17 -0400 |
| commit | 72d268401604fbac93ca4701ab53d32880483686 (patch) | |
| tree | a1ab880d30ece5ed1720d6db13ab5d9c5c1ca560 /Command/Unused.hs | |
| parent | 9229d182d32570f6829ced655aa673ceddfe7693 (diff) | |
Rethink filename encoding handling for display. Since filename encoding may or may not match locale settings, any attempt to decode filenames will fail for some files. So instead, do all output in binary mode.0.23
Diffstat (limited to 'Command/Unused.hs')
| -rw-r--r-- | Command/Unused.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Command/Unused.hs b/Command/Unused.hs index 9f3881d59..a614ce5d9 100644 --- a/Command/Unused.hs +++ b/Command/Unused.hs @@ -68,7 +68,7 @@ checkUnused = do dropmsg = ["(To remove unwanted data: git-annex dropunused NUMBER)"] table l = [" NUMBER KEY"] ++ map cols l - cols (n,k) = " " ++ pad 6 (show n) ++ " " ++ (filePathToString . show) k + cols (n,k) = " " ++ pad 6 (show n) ++ " " ++ show k pad n s = s ++ replicate (n - length s) ' ' number :: Int -> [a] -> [(Int, a)] |