diff -r 32a00ff29d1a -r fe5722fce758 src/HOL/String.thy
--- a/src/HOL/String.thy	Mon Sep 20 15:29:53 2010 +0200
+++ b/src/HOL/String.thy	Mon Sep 20 16:05:25 2010 +0200
@@ -53,7 +53,8 @@
    (fn n => fn m => Drule.instantiate' [] [SOME n, SOME m] @{thm nibble_pair_of_char.simps})
       nibbles nibbles;
 in
-  PureThy.note_thmss Thm.definitionK [((@{binding nibble_pair_of_char_simps}, []), [(thms, [])])]
+  Global_Theory.note_thmss Thm.definitionK
+    [((@{binding nibble_pair_of_char_simps}, []), [(thms, [])])]
   #-> (fn [(_, thms)] => fold_rev Code.add_eqn thms)
 end
 *}