Import firefox UX

This commit is contained in:
Mats Rauhala 2021-01-03 22:05:22 +02:00
parent e3d47d4d9d
commit c05161eb73
2 changed files with 4 additions and 0 deletions

View File

@ -27,6 +27,7 @@ commands = subparser
( command "insert" (info (insertOpts Operations.insert <**> helper) (progDesc "Insert a new bookmark")) ( command "insert" (info (insertOpts Operations.insert <**> helper) (progDesc "Insert a new bookmark"))
<> command "list" (info (pure Operations.list <**> helper) (progDesc "List all the bookmarks")) <> command "list" (info (pure Operations.list <**> helper) (progDesc "List all the bookmarks"))
<> command "query" (info (queryOpts Operations.query <**> helper) (progDesc "Query the bookmarks")) <> command "query" (info (queryOpts Operations.query <**> helper) (progDesc "Query the bookmarks"))
<> command "import" (info (pure Operations.importFirefox <**> helper) (progDesc "Import"))
) )
where where
insertOpts f = insertOpts f =

View File

@ -2,6 +2,7 @@ module Operations
( module Operations.Insert ( module Operations.Insert
, module Operations.List , module Operations.List
, module Operations.Query , module Operations.Query
, module Operations.Import.Firefox
) )
where where
@ -11,3 +12,5 @@ import Operations.List
(list) (list)
import Operations.Query import Operations.Query
(query) (query)
import Operations.Import.Firefox
(importFirefox)