summaryrefslogtreecommitdiff
path: root/Command/Unlock.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Command/Unlock.hs')
-rw-r--r--Command/Unlock.hs6
1 files changed, 4 insertions, 2 deletions
diff --git a/Command/Unlock.hs b/Command/Unlock.hs
index 9b568b5a6..c89b61de7 100644
--- a/Command/Unlock.hs
+++ b/Command/Unlock.hs
@@ -15,9 +15,11 @@ import Utility.FileMode
command :: [Command]
command =
- [ repoCommand "unlock" paramPaths seek "unlock files for modification"
- , repoCommand "edit" paramPaths seek "same as unlock"
+ [ c "unlock" "unlock files for modification"
+ , c "edit" "same as unlock"
]
+ where
+ c n = Command n paramPaths needsRepo seek
seek :: [CommandSeek]
seek = [withFilesInGit start]