Index: cortav.lua
==================================================================
--- cortav.lua
+++ cortav.lua
@@ -946,10 +946,13 @@
 		else
 			buf = buf .. c
 		end
 	end
 	flush()
+	for hk, ext in ctx.doc.docjob:each('hook', 'doc_macro_expand_span') do
+		hk(ctx.doc.docjob:delegate(ext), spans, {origin=ctx})
+	end
 	return spans
 end
 
 local function
 blockwrap(fn)