add example pdftoppm command to the cover

1 files changed, 5 insertions, 3 deletions

diff --git a/picarones-elm/src/Cover.elm b/picarones-elm/src/Cover.elm
index 5c92e73..5c9d040 100644
--- a/picarones-elm/src/Cover.elm
+++ b/picarones-elm/src/Cover.elm
@@ -65,7 +65,9 @@ mkRemark prefix = let example = case prefix of
                                     "" -> "https://yourdomain.tld/path-to-slides/01.png"
                                     _ -> prefix ++ "01.png"
                   in div [class "remark"] [
-                       text ("""Your slides should be available at the above uri, postfixed with a
-                                double-digit  number and a .png extension, e.g. """ ++ example ++
-                               " should contain an image.")
+                       p [] [text ("""Your slides should be available at the above uri, postfixed with a
+                                      double-digit  number and a .png extension, e.g. """ ++ example ++
+                                    " should contain an image.")]
+                      , p [] [text "You can convert a pdf to images like this:"]
+                      , pre [] [text "pdftoppm -png slides.pdf -scale-to-y 1080 -scale-to-x -1 slide"]
                       ]