From 949880b71b6b3d105ff5d73b1cf6958509b85c1e Mon Sep 17 00:00:00 2001 From: Adam Chlipala Date: Thu, 16 Apr 2009 12:07:21 -0400 Subject: Catching duplicate cookie and style paths --- src/mono_shake.sml | 2 ++ 1 file changed, 2 insertions(+) (limited to 'src/mono_shake.sml') diff --git a/src/mono_shake.sml b/src/mono_shake.sml index d2426f9f..0060d036 100644 --- a/src/mono_shake.sml +++ b/src/mono_shake.sml @@ -59,6 +59,7 @@ fun shake file = | ((DSequence _, _), acc) => acc | ((DDatabase _, _), acc) => acc | ((DJavaScript _, _), acc) => acc + | ((DCookie _, _), acc) => acc | ((DStyle _, _), acc) => acc) (IM.empty, IM.empty) file @@ -117,6 +118,7 @@ fun shake file = | (DSequence _, _) => true | (DDatabase _, _) => true | (DJavaScript _, _) => true + | (DCookie _, _) => true | (DStyle _, _) => true) file end -- cgit v1.2.3