diff -r 7c10b13d49fe -r 71af1fd6a5e4 doc-src/more_antiquote.ML
--- a/doc-src/more_antiquote.ML	Wed Jun 24 20:52:49 2009 +0200
+++ b/doc-src/more_antiquote.ML	Wed Jun 24 21:28:02 2009 +0200
@@ -81,7 +81,7 @@
 fun no_vars ctxt thm =
   let
     val ctxt' = Variable.set_body false ctxt;
-    val ((_, [thm]), _) = Variable.import_thms true [thm] ctxt';
+    val ((_, [thm]), _) = Variable.import true [thm] ctxt';
   in thm end;
 
 fun pretty_code_thm src ctxt raw_const =