diff options
| author |  Joey Hess <joeyh@joeyh.name> | 2015-05-27 16:40:03 -0400 |
|---|---|---|
| committer | Joey Hess <joeyh@joeyh.name> | 2015-05-27 16:40:03 -0400 |
| commit | 7439ae35d768c77d679cba04fb3fb07ac795ef83 (patch) | |
| tree | 05d15238ade3430407529e54a37ae639e136769b /Utility/ExternalSHA.hs | |
| parent | fbd5182829d570231f911cb5ac7919d6333ccddc (diff) | |
fsck: When checksumming a file fails due to a hardware fault, the file is now moved to the bad directory, and the fsck proceeds. Before, the fsck immediately failed.
Diffstat (limited to 'Utility/ExternalSHA.hs')
| -rw-r--r-- | Utility/ExternalSHA.hs | 2 |
1 files changed, 0 insertions, 2 deletions
diff --git a/Utility/ExternalSHA.hs b/Utility/ExternalSHA.hs index 3238c4733..e581697ae 100644 --- a/Utility/ExternalSHA.hs +++ b/Utility/ExternalSHA.hs @@ -21,8 +21,6 @@ import Utility.Exception import Data.List import Data.Char import System.IO -import Control.Applicative -import Prelude externalSHA :: String -> Int -> FilePath -> IO (Either String String) externalSHA command shasize file = do |