asciidoc-0.1: test/asciidoctor/image/with-id.test

[[img-sunset]]
image::sunset.jpg[]
>>>
Document
  { docMeta =
      Meta
        { docTitle = []
        , docTitleAttributes = Nothing
        , docAuthors = []
        , docRevision = Nothing
        , docAttributes = fromList [ ( "sectids" , "" ) ]
        }
  , docBlocks =
      [ Block
          Attr
          ( [] , fromList [ ( "id" , "img-sunset" ) ] )
          Nothing
          (BlockImage (Target "sunset.jpg") Nothing Nothing Nothing)
      ]
  }