[commit: ghc] ghc-7.8: Fix a typo in an error message (246c380)

[git at git.haskell.org]

Repository : ssh://git@git.haskell.org/ghc

On branch  : ghc-7.8
Link       : http://ghc.haskell.org/trac/ghc/changeset/246c3807a71bfb7d4f982a1903c22e3c81d74d37/ghc

>---------------------------------------------------------------

commit 246c3807a71bfb7d4f982a1903c22e3c81d74d37
Author: Gabor Greif <ggreif at gmail.com>
Date:   Tue Oct 7 10:20:08 2014 +0200

    Fix a typo in an error message
    
    (cherry picked from commit 3c5648afff13e9f6e94dea4094cc3a3fb97baeea)


>---------------------------------------------------------------

246c3807a71bfb7d4f982a1903c22e3c81d74d37
 compiler/typecheck/TcTyClsDecls.lhs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/compiler/typecheck/TcTyClsDecls.lhs b/compiler/typecheck/TcTyClsDecls.lhs
index 1345696..f416067 100644
--- a/compiler/typecheck/TcTyClsDecls.lhs
+++ b/compiler/typecheck/TcTyClsDecls.lhs
@@ -1655,7 +1655,7 @@ checkFamFlag tc_name
   = do { idx_tys <- xoptM Opt_TypeFamilies
        ; checkTc idx_tys err_msg }
   where
-    err_msg = hang (ptext (sLit "Illegal family declaraion for") <+> quotes (ppr tc_name))
+    err_msg = hang (ptext (sLit "Illegal family declaration for") <+> quotes (ppr tc_name))
                  2 (ptext (sLit "Use TypeFamilies to allow indexed type families"))
 \end{code}