# HG changeset patch
# User haftmann
# Date 1236009519 -3600
# Node ID 39fefb3eedfc08dd9fb6e7be80a32727ace254a0
# Parent  7e440d357bc4066d074707d7d08710d608add587
better markup

diff -r 7e440d357bc4 -r 39fefb3eedfc src/HOL/Tools/datatype_package.ML
--- a/src/HOL/Tools/datatype_package.ML	Mon Mar 02 12:34:03 2009 +0000
+++ b/src/HOL/Tools/datatype_package.ML	Mon Mar 02 16:58:39 2009 +0100
@@ -631,8 +631,8 @@
 
 local
 
-val sym_datatype = Pretty.str "\\isacommand{datatype}";
-val sym_binder = Pretty.str "\\ {\\isacharequal}";
+val sym_datatype = Pretty.command "datatype";
+val sym_binder = Pretty.str "\\ {\\isacharequal}"; (*FIXME use proper symbol*)
 val sym_sep = Pretty.str "{\\isacharbar}\\ ";
 
 in