diff options
| author | simonpj <unknown> | 2001-01-26 11:50:40 +0000 |
|---|---|---|
| committer | simonpj <unknown> | 2001-01-26 11:50:40 +0000 |
| commit | 4ec16731b9c768ceca2eca8095897a1fe6ca468e (patch) | |
| tree | 69a12fc950a782cf5f14df443dbd63dba06a8e95 /ghc/compiler/rename | |
| parent | 75eadc4bb302c0f4f78a6921c68e9d6aa35a070d (diff) | |
| download | haskell-4ec16731b9c768ceca2eca8095897a1fe6ca468e.tar.gz | |
[project @ 2001-01-26 11:50:39 by simonpj]
Wibbles
Diffstat (limited to 'ghc/compiler/rename')
| -rw-r--r-- | ghc/compiler/rename/Rename.lhs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ghc/compiler/rename/Rename.lhs b/ghc/compiler/rename/Rename.lhs index 87eb777eca..c30be13bbb 100644 --- a/ghc/compiler/rename/Rename.lhs +++ b/ghc/compiler/rename/Rename.lhs @@ -891,7 +891,7 @@ warnDeprec :: (Name, DeprecTxt) -> RnM d () warnDeprec (name, txt) = pushSrcLocRn (getSrcLoc name) $ addWarnRn $ - sep [ text (occNameFlavour (nameOccName name)) <+> ppr name <+> + sep [ text (occNameFlavour (nameOccName name)) <+> quotes (ppr name) <+> text "is deprecated:", nest 4 (ppr txt) ] |