src/Pure/Isar/element.ML
changeset 62094 7d47cf67516d
parent 61841 4d3527b94f2a
child 62680 646b84666a56
--- a/src/Pure/Isar/element.ML	Thu Jan 07 15:53:39 2016 +0100
+++ b/src/Pure/Isar/element.ML	Thu Jan 07 16:10:13 2016 +0100
@@ -152,7 +152,7 @@
   let
     val prt_typ = Pretty.quote o Syntax.pretty_typ ctxt;
     val prt_term = Pretty.quote o Syntax.pretty_term ctxt;
-    val prt_thm = Pretty.backquote o Thm.pretty_thm ctxt;
+    val prt_thm = Pretty.cartouche o Thm.pretty_thm ctxt;
 
     fun prt_binding (b, atts) =
       Attrib.pretty_binding ctxt (b, if show_attribs then atts else []);