src/Pure/pure_thy.ML
changeset 5871 2c037ffa7287
parent 5686 1f053d05f571
child 5907 4b9f4e310891
--- a/src/Pure/pure_thy.ML	Mon Nov 16 10:41:27 1998 +0100
+++ b/src/Pure/pure_thy.ML	Mon Nov 16 10:42:40 1998 +0100
@@ -134,7 +134,7 @@
 
 fun get_tthmss thy names = flat (map (get_tthms thy) names);
 
-fun get_thms thy = map Attribute.thm_of o get_tthms thy;
+fun get_thms thy = Attribute.thms_of o get_tthms thy;
 fun get_thm thy = Attribute.thm_of o get_tthm thy;