@@ -1122,7 +1122,11 @@ inlineToLaTeX (Image attr _ (source, _)) = do
1122 Just (Pixel a) ->
1122 Just (Pixel a) ->
1123 [d <> text (showInInch opts (Pixel a)) <> "in"]
1123 [d <> text (showInInch opts (Pixel a)) <> "in"]
1124 Just (Percent a) ->
1124 Just (Percent a) ->
1125− [d <> text (showFl (a / 100)) <> "\\textwidth"]
1125+ [d <> text (showFl (a / 100)) <>
1127+ Width -> "\\textwidth"
1128+ Height -> "\\textheight"
1126 Just dim ->
1130 Just dim ->
1127 [d <> text (show dim)]
1131 [d <> text (show dim)]
1128 Nothing ->
1132 Nothing ->