add a UUIDDesc type containing a ByteString
Groundwork for handling uuid.log using ByteString
This commit is contained in:
parent
b781fbcccf
commit
894716512d
21 changed files with 94 additions and 74 deletions
|
@ -29,5 +29,5 @@ start _ = giveup "Specify a repository and a description."
|
|||
|
||||
perform :: UUID -> String -> CommandPerform
|
||||
perform u description = do
|
||||
describeUUID u description
|
||||
describeUUID u (toUUIDDesc description)
|
||||
next $ return True
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue