src/Pure/Syntax/syntax_phases.ML
changeset 80744 515a6659cb7b
parent 80743 94e64d8ac668
child 80745 57754091318e
--- a/src/Pure/Syntax/syntax_phases.ML	Fri Aug 23 14:41:45 2024 +0200
+++ b/src/Pure/Syntax/syntax_phases.ML	Fri Aug 23 14:56:33 2024 +0200
@@ -708,7 +708,7 @@
     val m1 =
       if Variable.is_fixed ctxt x orelse Syntax.is_pretty_global ctxt
       then Markup.fixed x else Markup.intensify;
-    val m2 = if Name.is_skolem x then Markup.skolem else Markup.free;
+    val m2 = Variable.markup ctxt x;
   in [m1, m2] end;
 
 fun markup ctxt c =