From bef62cbd96e3153e9314c7f824cdbbd7b6106305 Mon Sep 17 00:00:00 2001
From: simonmar <unknown>
Date: Wed, 31 May 2000 16:04:47 +0000
Subject: [PATCH] [project @ 2000-05-31 16:04:47 by simonmar] fix apparent
 cut-n-pasto: rEC_SEL_ERROR_ID was printed as "patError".

---
 ghc/compiler/basicTypes/MkId.lhs |    4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/ghc/compiler/basicTypes/MkId.lhs b/ghc/compiler/basicTypes/MkId.lhs
index 9c52fdd..88078e8 100644
--- a/ghc/compiler/basicTypes/MkId.lhs
+++ b/ghc/compiler/basicTypes/MkId.lhs
@@ -701,10 +701,10 @@ templates, but we don't ever expect to generate code for it.
 \begin{code}
 eRROR_ID
   = pc_bottoming_Id errorIdKey pREL_ERR SLIT("error") errorTy
-rEC_SEL_ERROR_ID
-  = generic_ERROR_ID recSelErrIdKey SLIT("patError")
 pAT_ERROR_ID
   = generic_ERROR_ID patErrorIdKey SLIT("patError")
+rEC_SEL_ERROR_ID
+  = generic_ERROR_ID recSelErrIdKey SLIT("recSelError")
 rEC_CON_ERROR_ID
   = generic_ERROR_ID recConErrorIdKey SLIT("recConError")
 rEC_UPD_ERROR_ID
-- 
1.7.10.4