src/Pure/PIDE/resources.ML
changeset 59123 e68e44836d04
parent 59083 88b0b1f28adc
child 59689 7968c57ea240
--- a/src/Pure/PIDE/resources.ML	Tue Dec 09 21:14:11 2014 +0100
+++ b/src/Pure/PIDE/resources.ML	Tue Dec 09 22:13:48 2014 +0100
@@ -158,7 +158,7 @@
     fun init () =
       begin_theory master_dir header parents
       |> Present.begin_theory update_time
-          (fn () => HTML.html_mode (implode o map Thy_Syntax.present_span) spans);
+          (fn () => HTML.html_mode (implode o map (Thy_Syntax.present_span keywords)) spans);
 
     val (results, thy) =
       cond_timeit true ("theory " ^ quote name)