diff options
author | 2014-01-21 17:08:49 -0400 | |
---|---|---|
committer | 2014-01-21 17:25:39 -0400 | |
commit | d44bd607d4fd18eadabe3c7693ebcf1c74aae63e (patch) | |
tree | 83e8867f45199ece960fc67e4d31f1d9b4a5d56a /Command/NumCopies.hs | |
parent | d5f7fb27aad3e2e9c4bebb9ccd5577af8deb25c7 (diff) |
numcopies cleanup, part 2
This includes several bug fixes.
Diffstat (limited to 'Command/NumCopies.hs')
-rw-r--r-- | Command/NumCopies.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Command/NumCopies.hs b/Command/NumCopies.hs index 51bde2e68..cc322bcbd 100644 --- a/Command/NumCopies.hs +++ b/Command/NumCopies.hs @@ -42,10 +42,10 @@ startGet = next $ next $ do Just n -> liftIO $ putStrLn $ show $ fromNumCopies n Nothing -> do liftIO $ putStrLn $ "global numcopies is not set" - old <- annexNumCopies <$> Annex.getGitConfig + old <- deprecatedNumCopies case old of Nothing -> liftIO $ putStrLn "(default is 1)" - Just n -> liftIO $ putStrLn $ "(deprecated git config annex.numcopies is set to " ++ show n ++ " locally)" + Just n -> liftIO $ putStrLn $ "(deprecated git config annex.numcopies is set to " ++ show (fromNumCopies n) ++ " locally)" return True startSet :: Int -> CommandStart |