fix complete pattern in isOldFile

This commit is contained in:
krasimir
2008-04-22 13:09:14 +00:00
parent 09a82c8abb
commit b5e4b73273

View File

@@ -305,6 +305,7 @@ isOldFile f = do
where
old (PT _ (TS t)) = elem t $ words
"cat category data def flags fun include lin lincat lindef lintype oper param pattern printname rule"
old _ = False