diff --git a/fluid/lib/convolution.fld b/fluid/lib/convolution.fld
index f0341e09d..9b5846e15 100644
--- a/fluid/lib/convolution.fld
+++ b/fluid/lib/convolution.fld
@@ -14,4 +14,3 @@ let convolve image kernel boundary =
              x >= 1, x <= m, y >= 1, y <= n
          ] in weightedSum `quot` area
          | (m', n') in (m, n) |];
-
diff --git a/src/Fluid.purs b/src/Fluid.purs
index f53cf6a05..75b7c7c55 100644
--- a/src/Fluid.purs
+++ b/src/Fluid.purs
@@ -89,9 +89,9 @@ dispatchCommand ∷ Command → Aff Unit
 dispatchCommand (Evaluate p) = do
    v <- (evaluate p)
    log (prettyP v)
-dispatchCommand (Publish (Folder website) b) = do -- Publish -> BundleWebsite?
+dispatchCommand (Publish (Folder website) b) = -- Publish -> BundleWebsite?
+
    void $ liftEffect $ publish website b
-   log "Published"
 
 copyOptions :: ExecOptions
 copyOptions =
@@ -125,7 +125,7 @@ main = runAff_ callback (dispatchCommand =<< liftEffect (execParser opts))
 callback :: Either Error Unit -> Effect Unit
 callback = case _ of
    Left err -> logShow err
-   Right _ -> log "Success"
+   Right _ -> pure unit
 
 evaluate :: Program -> Aff (Val Unit)
 evaluate (Program { imports, datasets, fileName }) = do