diff options
| author |  Joey Hess <joey@kitenet.net> | 2011-10-11 14:43:45 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2011-10-11 14:43:45 -0400 |
| commit | b505ba83e8b62a9ed0ec2fb96448c5fc801184d9 (patch) | |
| tree | 664eb4af9f274dfc13eb9abfab86421ebe38e881 /git-annex-shell.hs | |
| parent | 025ded4a2dfb58a6ec0cb47b9d625d593a4e1977 (diff) | |
minor syntax changes
Diffstat (limited to 'git-annex-shell.hs')
| -rw-r--r-- | git-annex-shell.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/git-annex-shell.hs b/git-annex-shell.hs index 79b5da69a..a4d8dd65b 100644 --- a/git-annex-shell.hs +++ b/git-annex-shell.hs @@ -37,7 +37,7 @@ options = uuid : commonOptions where uuid = Option [] ["uuid"] (ReqArg check paramUUID) "repository uuid" check expected = do - u <- getUUID =<< gitRepo + u <- getUUID when (u /= expected) $ error $ "expected repository UUID " ++ expected ++ " but found UUID " ++ u |