Merge branch 'master' of darcs.haskell.org:/srv/darcs//ghc

compiler/main/HscMain.hs

@@ -382,7 +382,7 @@ hscParse' mod_summary = do
                 srcs0 = nub $ filter (not . (tmpDir dflags `isPrefixOf`))
                             $ filter (not . (== n_hspp))
                             $ map FilePath.normalise
-                            $ filter (not . (== '<') . head)
+                            $ filter (not . (isPrefixOf "<"))
                             $ map unpackFS
                             $ srcfiles pst
                 srcs1 = case ml_hs_file (ms_location mod_summary) of