@@ -253,10 +253,9 @@ blockCommand = try $ do
253253 let raw = do
254254 rawcommand <- getRawCommand name'
255255 transformed <- applyMacros' rawcommand
256+ guard $ transformed /= rawcommand
256257 notFollowedBy $ parseFromString inlines transformed
257− if transformed /= rawcommand
258− then parseFromString blocks transformed
259− else mzero
258+ parseFromString blocks transformed
260259 case M.lookup name' blockCommands of
261260 Just p -> p
262261 Nothing -> case M.lookup name blockCommands of