author | wenzelm |
Fri, 18 Apr 2008 23:58:04 +0200 | |
changeset 26723 | 3e4bb1ca9a74 |
parent 26722 | a239220108a5 |
child 26724 | ff6ff3a9010e |
--- a/src/Pure/ProofGeneral/proof_general_pgip.ML Fri Apr 18 23:49:46 2008 +0200 +++ b/src/Pure/ProofGeneral/proof_general_pgip.ML Fri Apr 18 23:58:04 2008 +0200 @@ -628,8 +628,6 @@ fun idtable ty ctx ids = {objtype=ty,context=ctx,ids=ids} - val thms_of_thy = map fst o PureThy.thms_of o ThyInfo.get_theory - val thy_name = Path.implode o #1 o Path.split_ext o Path.base fun filerefs f =