From c05161eb73864b28b94dfc945fd2968626b9db62 Mon Sep 17 00:00:00 2001
From: Mats Rauhala <mats.rauhala@iki.fi>
Date: Sun, 3 Jan 2021 22:05:22 +0200
Subject: [PATCH] Import firefox UX

---
 app/Main.hs       | 1 +
 src/Operations.hs | 3 +++
 2 files changed, 4 insertions(+)

diff --git a/app/Main.hs b/app/Main.hs
index cf3c54a..662dec2 100644
--- a/app/Main.hs
+++ b/app/Main.hs
@@ -27,6 +27,7 @@ commands = subparser
   (  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 "query" (info (queryOpts Operations.query <**> helper) (progDesc "Query the bookmarks"))
+  <> command "import" (info (pure Operations.importFirefox <**> helper) (progDesc "Import"))
   )
   where
     insertOpts f =
diff --git a/src/Operations.hs b/src/Operations.hs
index c0ed6d6..57f331a 100644
--- a/src/Operations.hs
+++ b/src/Operations.hs
@@ -2,6 +2,7 @@ module Operations
   ( module Operations.Insert
   , module Operations.List
   , module Operations.Query
+  , module Operations.Import.Firefox
   )
   where
 
@@ -11,3 +12,5 @@ import Operations.List
        (list)
 import Operations.Query
        (query)
+import Operations.Import.Firefox
+       (importFirefox)