refactor param seeking

This commit is contained in:
Joey Hess 2010-11-11 18:54:52 -04:00
parent 5357d3a37a
commit da0de293d1
17 changed files with 138 additions and 93 deletions

View file

@ -18,6 +18,9 @@ import Locations
import Utility
import Core
seek :: [SubCmdSeek]
seek = [withFilesInGit start]
{- The unlock subcommand replaces the symlink with a copy of the file's
- content. -}
start :: SubCmdStartString