diff options
Diffstat (limited to 'Command/SetPresentKey.hs')
-rw-r--r-- | Command/SetPresentKey.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Command/SetPresentKey.hs b/Command/SetPresentKey.hs index 35ede9553..73847792d 100644 --- a/Command/SetPresentKey.hs +++ b/Command/SetPresentKey.hs @@ -23,7 +23,7 @@ seek = withWords start start :: [String] -> CommandStart start (ks:us:vs:[]) = do - showStart' "setpresentkey" k Nothing + showStart' "setpresentkey" k k next $ perform k (toUUID us) s where k = fromMaybe (error "bad key") (file2key ks) |