[commit: ghc] master: Fix typo in a836b6, 'Improve orientation' (54c5fde)

[git at git.haskell.org]

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

On branch  : master
Link       : http://ghc.haskell.org/trac/ghc/changeset/54c5fde9010021214ac5ad88cb80a94fb8014747/ghc

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

commit 54c5fde9010021214ac5ad88cb80a94fb8014747
Author: Simon Peyton Jones <simonpj at microsoft.com>
Date:   Mon Nov 18 18:09:28 2013 +0000

    Fix typo in a836b6, 'Improve orientation'
    
    Just a straightforward error, now fixed.


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

54c5fde9010021214ac5ad88cb80a94fb8014747
 compiler/typecheck/TcCanonical.lhs |    4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/compiler/typecheck/TcCanonical.lhs b/compiler/typecheck/TcCanonical.lhs
index 1850fdf..b49e0b9 100644
--- a/compiler/typecheck/TcCanonical.lhs
+++ b/compiler/typecheck/TcCanonical.lhs
@@ -1031,8 +1031,8 @@ reOrient (VarCls tv1)  (VarCls tv2)
     tv2 `better_than` tv1
       | isMetaTyVar tv1     = False   -- Never swap a meta-tyvar
       | isFlatSkolTyVar tv1 = isMetaTyVar tv2
-      | otherwise           = isMetaTyVar tv1 || isFlatSkolTyVar tv2
-                                      -- Note [Eliminate flat-skols]
+      | otherwise           = isMetaTyVar tv2 || isFlatSkolTyVar tv2
+                            -- Note [Eliminate flat-skols]
 
 ------------------