diff --git a/make-pages/SinglePage.hs b/make-pages/SinglePage.hs
index 386b813..5a1e353 100644
--- a/make-pages/SinglePage.hs
+++ b/make-pages/SinglePage.hs
@@ -9,7 +9,7 @@ import qualified NsfwWarning
import Control.Exception
import Control.Monad
import Data.List (sort, intersperse)
-import Data.Maybe (fromMaybe)
+import Data.Maybe (fromMaybe, isNothing)
import qualified Data.Text as Strict
import qualified Data.Text.Lazy as Lazy
import System.FilePath (joinPath, splitPath)
@@ -97,6 +97,16 @@ make' root siteName prefix nsfw _dataDir dir
let nsfwScript = NsfwWarning.script nsfw'
let nsfwDialog = NsfwWarning.dialog nsfw'
+ let imageMeta =
+ if #sfw image0 && isNothing (#warning image0) then [b|@0
+
+
+
+ |] else [b|@0
+
+
+ |]
+
pure [b|@0
@@ -105,14 +115,13 @@ make' root siteName prefix nsfw _dataDir dir
-
+
-
-
+ $imageMeta