diff options
| author |  Joey Hess <joey@kitenet.net> | 2012-10-15 22:22:40 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2012-10-15 22:22:40 -0400 |
| commit | acd55616a7128d42ca191e2978919dfac6e2d1ba (patch) | |
| tree | 6d2a6c29f275b000680d108d7b8788cdce03b9d8 /GitAnnexShell.hs | |
| parent | 72813114685613f72bc2d7b5d54596c14a5cf0f2 (diff) | |
Bug fix: A recent change caused git-annex-shell to crash.
Diffstat (limited to 'GitAnnexShell.hs')
| -rw-r--r-- | GitAnnexShell.hs | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/GitAnnexShell.hs b/GitAnnexShell.hs index ebe280279..4436ab3e1 100644 --- a/GitAnnexShell.hs +++ b/GitAnnexShell.hs @@ -105,6 +105,7 @@ external params = do -} partitionParams :: [String] -> ([String], [String]) partitionParams params + | null segments = ([], []) | length segments < 2 = (segments !! 0, []) | otherwise = (segments !! 0, segments !! 1) where |