diff --git a/hakyll.cabal b/hakyll.cabal
--- a/hakyll.cabal
+++ b/hakyll.cabal
@@ -1,5 +1,5 @@
 Name:    hakyll
-Version: 4.7.2.3
+Version: 4.7.3.0
 
 Synopsis: A static website compiler library
 Description:
@@ -220,7 +220,7 @@
     TestSuite.Util
 
   Build-Depends:
-    HUnit                      >= 1.2 && < 1.3,
+    HUnit                      >= 1.2 && < 1.4,
     QuickCheck                 >= 2.4 && < 2.9,
     test-framework             >= 0.4 && < 0.9,
     test-framework-hunit       >= 0.3 && < 0.4,
diff --git a/src/Hakyll/Init.hs b/src/Hakyll/Init.hs
--- a/src/Hakyll/Init.hs
+++ b/src/Hakyll/Init.hs
@@ -9,7 +9,7 @@
 import           Control.Monad         (forM_)
 import           Data.Char             (isAlphaNum, isNumber)
 import           Data.List             (foldl')
-import           Data.List             (intercalate)
+import           Data.List             (intercalate, isPrefixOf)
 import           Data.Version          (Version (..))
 import           System.Directory      (canonicalizePath, copyFile)
 import           System.Environment    (getArgs, getProgName)
@@ -31,7 +31,13 @@
     files    <- getRecursiveContents (const $ return False) srcDir
 
     case args of
-        [dstDir] -> do
+        -- When the argument begins with hyphens, it's more likely that the user
+        -- intends to attempt some arguments like ("--help", "-h", "--version", etc.)
+        -- rather than create directory with that name.
+        -- If dstDir begins with hyphens, the guard will prevent it from creating
+        -- directory with that name so we can fall to the second alternative
+        -- which prints a usage info for user.
+        [dstDir] | not ("-" `isPrefixOf` dstDir) -> do
             forM_ files $ \file -> do
                 let dst = dstDir </> file
                     src = srcDir </> file
diff --git a/src/Hakyll/Web/Html.hs b/src/Hakyll/Web/Html.hs
--- a/src/Hakyll/Web/Html.hs
+++ b/src/Hakyll/Web/Html.hs
@@ -55,7 +55,7 @@
 
 --------------------------------------------------------------------------------
 isUrlAttribute :: String -> Bool
-isUrlAttribute = (`elem` ["src", "href", "data"])
+isUrlAttribute = (`elem` ["src", "href", "data", "poster"])
 
 
 --------------------------------------------------------------------------------
diff --git a/tests/Hakyll/Web/Html/RelativizeUrls/Tests.hs b/tests/Hakyll/Web/Html/RelativizeUrls/Tests.hs
--- a/tests/Hakyll/Web/Html/RelativizeUrls/Tests.hs
+++ b/tests/Hakyll/Web/Html/RelativizeUrls/Tests.hs
@@ -22,6 +22,9 @@
             relativizeUrlsWith ".." "<a href=\"/foo\">bar</a>"
         , "<img src=\"../../images/lolcat.png\" />" @=?
             relativizeUrlsWith "../.." "<img src=\"/images/lolcat.png\" />"
+        , "<video poster=\"../../images/lolcat.png\"></video>" @=?
+            relativizeUrlsWith "../.."
+                "<video poster=\"/images/lolcat.png\"></video>"
         , "<a href=\"http://haskell.org\">Haskell</a>" @=?
             relativizeUrlsWith "../.."
                 "<a href=\"http://haskell.org\">Haskell</a>"