diff -r 9af593e9e454 -r 2e33897071b6 src/Pure/General/binding.ML
--- a/src/Pure/General/binding.ML	Thu Sep 12 19:46:08 2024 +0200
+++ b/src/Pure/General/binding.ML	Thu Sep 12 19:52:01 2024 +0200
@@ -172,7 +172,7 @@
 fun pretty (Binding {prefix, qualifier, name, pos, ...}) =
   if name = "" then Pretty.str "\"\""
   else
-    Pretty.markup (Position.markup pos Markup.binding)
+    Pretty.markup (Position.markup_properties pos Markup.binding)
       [Pretty.str (Long_Name.implode (map #1 (prefix @ qualifier) @ [name]))]
     |> Pretty.quote;