Add a 1ms delay before inserting, as not to overload the DB connection

src/Flora/Import/Package.hs

@@ -1,6 +1,7 @@
 {-# OPTIONS_GHC -Wno-unused-imports #-}
 module Flora.Import.Package where
 
+import Control.Concurrent
 import Control.Monad.Except
 import qualified Data.ByteString as B
 import Data.Map (Map)
@@ -132,6 +133,7 @@ importCabal userId namespace packageName directory = do
     case result of
       Left err -> error $ "Encountered error during import: " <> show err
       Right (package, release, components, requirements) -> do
+        liftIO $ threadDelay 1000 -- 1ms
         publishPackage requirements components release package
 
 importPackageDeps :: PackageName -> FilePath -> DBT IO (Map PackageName (Set PackageName))