diff options
author | 2011-03-03 21:02:29 -0400 | |
---|---|---|
committer | 2011-03-03 21:02:29 -0400 | |
commit | 42259eee9200588f69af2b56557d5d191d426ad0 (patch) | |
tree | 7595b3571c787d926b1d66a49e8bdd11cd23e772 /git-annex-shell.hs | |
parent | b27b0d5cd463afcce8a95730a49288edd89eb8b8 (diff) |
support git funky remote syntaxes
* Look for dir.git directories the same as git does.
* Support remote urls specified as relative paths.
* Support non-ssh remote paths that contain tilde expansions.
Diffstat (limited to 'git-annex-shell.hs')
-rw-r--r-- | git-annex-shell.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/git-annex-shell.hs b/git-annex-shell.hs index aeaadcbf8..e8a744748 100644 --- a/git-annex-shell.hs +++ b/git-annex-shell.hs @@ -60,8 +60,8 @@ builtins = map cmdname cmds builtin :: String -> String -> [String] -> IO () builtin cmd dir params = do - dir' <- Git.absDir dir - let gitrepo = Git.repoFromPath dir' + dir' <- Git.repoAbsPath dir + gitrepo <- Git.repoFromAbsPath dir' dispatch gitrepo (cmd:(filterparams params)) cmds commonOptions header external :: [String] -> IO () |