summaryrefslogtreecommitdiff
path: root/Upgrade.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2011-02-28 16:10:16 -0400
committerGravatar Joey Hess <joey@kitenet.net>2011-02-28 16:18:55 -0400
commitfcdc4797a9ab2b792a9bb20f2ca9802b8f6d5a1e (patch)
tree0471848c11df7c1481d8c735eab1280d7684eddc /Upgrade.hs
parent7e5678bcf7cd78bd04520117201be37dc9d4d544 (diff)
use ShellParam type
So, I have a type checked safe handling of filenames starting with dashes, throughout the code.
Diffstat (limited to 'Upgrade.hs')
-rw-r--r--Upgrade.hs3
1 files changed, 2 insertions, 1 deletions
diff --git a/Upgrade.hs b/Upgrade.hs
index b584b2666..3c16bcc86 100644
--- a/Upgrade.hs
+++ b/Upgrade.hs
@@ -22,6 +22,7 @@ import qualified Annex
import qualified Backend
import Messages
import Version
+import Utility
{- Uses the annex.version git config setting to automate upgrades. -}
upgrade :: Annex Bool
@@ -62,7 +63,7 @@ upgradeFrom0 = do
link <- calcGitLink f k
liftIO $ removeFile f
liftIO $ createSymbolicLink link f
- Annex.queue "add" ["--"] f
+ Annex.queue "add" [Param "--"] f
fixlinks fs
getKeysPresent0' :: FilePath -> Annex [Key]