From b6fbea9780c7acaa623acf2289db1514745ab6b8 Mon Sep 17 00:00:00 2001 From: panne Date: Sun, 20 Jun 2004 17:58:49 +0000 Subject: [PATCH] [project @ 2004-06-20 17:58:46 by panne] Renamed Opt_WarnMisc to Opt_WarnDodgyImports --- ghc/compiler/main/CmdLineOpts.lhs | 4 ++-- ghc/compiler/rename/RnNames.lhs | 2 +- 2 files changed, 3 insertions(+), 3 deletions(-) diff --git a/ghc/compiler/main/CmdLineOpts.lhs b/ghc/compiler/main/CmdLineOpts.lhs index a230e8d..b68d236 100644 --- a/ghc/compiler/main/CmdLineOpts.lhs +++ b/ghc/compiler/main/CmdLineOpts.lhs @@ -266,7 +266,7 @@ data DynFlag | Opt_WarnUnusedImports | Opt_WarnUnusedMatches | Opt_WarnDeprecations - | Opt_WarnMisc + | Opt_WarnDodgyImports -- language opts | Opt_AllowOverlappingInstances @@ -675,7 +675,7 @@ minusWOpts Opt_WarnUnusedMatches, Opt_WarnUnusedImports, Opt_WarnIncompletePatterns, - Opt_WarnMisc + Opt_WarnDodgyImports ] minusWallOpts diff --git a/ghc/compiler/rename/RnNames.lhs b/ghc/compiler/rename/RnNames.lhs index f3fe011..baa7c74 100644 --- a/ghc/compiler/rename/RnNames.lhs +++ b/ghc/compiler/rename/RnNames.lhs @@ -474,7 +474,7 @@ filterImports iface imp_spec (Just (want_hiding, import_items)) total_avails Just avail@(AvailTC _ [n]) -> -- This occurs when you import T(..), but -- only export T abstractly. The single [n] -- in the AvailTC is the type or class itself - ifOptM Opt_WarnMisc (addWarn (dodgyImportWarn tc)) `thenM_` + ifOptM Opt_WarnDodgyImports (addWarn (dodgyImportWarn tc)) `thenM_` succeed_with False avail Just avail -> succeed_with False avail -- 1.7.10.4