From 630124149aa67bf288b577705b632acc0840cfe7 Mon Sep 17 00:00:00 2001 From: Greg Weber Date: Sun, 25 Dec 2011 22:27:05 -0300 Subject: [PATCH] fix yesod devel should also check for library-only --- yesod/Devel.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/yesod/Devel.hs b/yesod/Devel.hs index 44cfd865..1958fa1f 100644 --- a/yesod/Devel.hs +++ b/yesod/Devel.hs @@ -210,7 +210,7 @@ lookupDevelLib :: D.CondTree D.ConfVar c a -> Maybe a lookupDevelLib ct = listToMaybe . map (\(_,x,_) -> D.condTreeData x) . filter isDevelLib . D.condTreeComponents $ ct where - isDevelLib ((D.Var (D.Flag (D.FlagName "devel"))), _, _) = True - isDevelLib _ = False + isDevelLib ((D.Var (D.Flag (D.FlagName f))), _, _) = f `elem` ["library-only", "devel"] + isDevelLib _ = False