diff --git a/src/Handler/LMS/Result.hs b/src/Handler/LMS/Result.hs
index 7810b3797..30d999565 100644
--- a/src/Handler/LMS/Result.hs
+++ b/src/Handler/LMS/Result.hs
@@ -259,9 +259,7 @@ postLmsResultUploadR sid qsh = do
 
 postLmsResultDirectR :: SchoolId -> QualificationShorthand -> Handler Html
 postLmsResultDirectR sid qsh = do  
-  (params, files) <- runRequestBody 
-  $logWarnS "LMS_1" $ tshow params 
-  $logWarnS "LMS_2" $ tshow $ fst <$> files
+  (_params, files) <- runRequestBody 
   (status, msg) <- case files of
     [(fhead,file)] -> do
       runDBJobs $ do