refactor
This commit is contained in:
parent
63a292324d
commit
64bc4e4751
2 changed files with 6 additions and 9 deletions
|
@ -9,8 +9,6 @@ module Command.Init where
|
|||
|
||||
import Common.Annex
|
||||
import Command
|
||||
import Annex.UUID
|
||||
import Logs.UUID
|
||||
import Init
|
||||
|
||||
def :: [Command]
|
||||
|
@ -29,7 +27,5 @@ start ws = do
|
|||
|
||||
perform :: String -> CommandPerform
|
||||
perform description = do
|
||||
initialize
|
||||
u <- getUUID
|
||||
describeUUID u description
|
||||
initialize (Just description)
|
||||
next $ return True
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue