chore(versionbump): Additional restrictions added; redundant imports removed.

src/Utils/Exam/Correct.hs

@@ -12,7 +12,7 @@ import Import.NoFoundation
 
 import qualified Data.Aeson as JSON
 import qualified Data.Aeson.KeyMap as KeyMap
-import qualified Data.HashMap.Strict as HashMap
+-- import qualified Data.HashMap.Strict as HashMap
 
 
 data CorrectInterfaceUser

src/Utils/Files.hs

@@ -226,6 +226,7 @@ type FileUploads = ConduitT () FileReference (HandlerFor UniWorX) ()
 
 replaceFileReferences' :: ( MonadIO m, MonadThrow m
                           , IsFileReference record
+                          , SafeToInsert record
                           , PersistEntityBackend record ~ SqlBackend
                           )
                        => (FileReferenceResidual record -> [Filter record])
@@ -261,6 +262,7 @@ replaceFileReferences' mkFilter residual = do
 replaceFileReferences :: ( MonadHandler m, MonadThrow m
                          , HandlerSite m ~ UniWorX
                          , IsFileReference record
+                         , SafeToInsert record
                          , PersistEntityBackend record ~ SqlBackend
                          )
                       => (FileReferenceResidual record -> [Filter record])