@@ -1125,12 +1125,7 @@ inlineToLaTeX (Image attr _ (source, _)) = do
11251125 [d <> text (show dim)]
11261126 Nothing ->
11271127 []
1128− -- if we just have a width or a height, we add keepaspectratio:
1129− keepaspectratio = case (dimension Height attr, dimension Width attr) of
1130− (Nothing, Just _) -> ["keepaspectratio"]
1131− (Just _, Nothing) -> ["keepaspectratio"]
1132− _ -> []
1133− dimList = showDim Width ++ showDim Height ++ keepaspectratio
1128+ dimList = showDim Width ++ showDim Height
11341129 dims = if null dimList
11351130 then empty
11361131 else brackets $ cat (intersperse "," dimList)