diff options
author | Joey Hess <joey@kitenet.net> | 2011-04-27 20:06:07 -0400 |
---|---|---|
committer | Joey Hess <joey@kitenet.net> | 2011-04-27 20:23:09 -0400 |
commit | e68f128a9bf46c8f4ebe51fcb3b6f63955cadd2e (patch) | |
tree | 2102052ed8289efa0e44b4f9269c423753d70983 /Utility.hs | |
parent | 4381ac062fa7cec01476e84a7bd8e154efb8aacd (diff) |
rsync special remote
Fully tested and working, including resuming and encryption. (Though not
resuming when sending *with* encryption; gpg doesn't produce identical
output each time.)
Uses same layout as the directory special remote and the .git/annex/objects/
directory.
Diffstat (limited to 'Utility.hs')
-rw-r--r-- | Utility.hs | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/Utility.hs b/Utility.hs index 13ebbfccb..51bbc17a3 100644 --- a/Utility.hs +++ b/Utility.hs @@ -95,8 +95,9 @@ boolSystem command params = do restoresignals oldint oldset executeFile command True (toCommand params) Nothing -{- Escapes a filename to be safely able to be exposed to the shell. -} -shellEscape :: FilePath -> String +{- Escapes a filename or other parameter to be safely able to be exposed to + - the shell. -} +shellEscape :: String -> String shellEscape f = "'" ++ escaped ++ "'" where -- replace ' with '"'"' |