diff --git a/src/Text/Pandoc/Util/Filter.hs b/src/Text/Pandoc/Util/Filter.hs
index df1af55..ff1c824 100644
--- a/src/Text/Pandoc/Util/Filter.hs
+++ b/src/Text/Pandoc/Util/Filter.hs
@@ -81,6 +81,7 @@ revealjsSpecialAttrs =
     , "data-ignore"
     , "controls"
     , "loop"
+    , "muted"
     ]
 
 -- | revealjs has some special attributes that has to be
diff --git a/src/Text/Pandoc/Util/Filter/Media.hs b/src/Text/Pandoc/Util/Filter/Media.hs
index b7c95fa..d58eacf 100644
--- a/src/Text/Pandoc/Util/Filter/Media.hs
+++ b/src/Text/Pandoc/Util/Filter/Media.hs
@@ -131,7 +131,7 @@ media (Image (id', att, att') alt (filename,_))
 --images
 media (Image (id', att, att') [] (filename,_))
   | id' == "img" || checkExtension filename imgExt
-    = return $ [toHtml $ "<img " <> unwords direct <> " src=\"" <> filename <> "\" style=\"" <> style <> "\"></img>"]
+    = return $ [toHtml $ "<img " <> attToString (idFilter "img" id',css,att') <> unwords direct <> " src=\"" <> filename <> "\" style=\"" <> style <> "\"></img>"]
       where
         (direct, css) = (classToRevealAttr . revealjsRewriteAttr) att
         style = filterStyle att'