replace freeze by 'setmp show_question_marks false';
authorwenzelm
Thu, 18 Aug 2005 11:17:51 +0200
changeset 17116 dda6c353b4ce
parent 17115 127aa3d49129
child 17117 e2bed9e82454
replace freeze by 'setmp show_question_marks false';
src/Pure/Thy/html.ML
--- a/src/Pure/Thy/html.ML	Thu Aug 18 11:17:50 2005 +0200
+++ b/src/Pure/Thy/html.ML	Thu Aug 18 11:17:51 2005 +0200
@@ -414,7 +414,7 @@
 
 val string_of_thm =
   Output.output o Pretty.setmp_margin 80 Pretty.string_of o
-    Display.pretty_thm_no_quote o #1 o Drule.freeze_thaw;
+    setmp show_question_marks false Display.pretty_thm_no_quote;
 
 fun thm th = preform (prefix_lines "  " (html_mode string_of_thm th));