From 3e273fe87f9fadca95412a4788ba1b2593a0a68e Mon Sep 17 00:00:00 2001
From: aarne <unknown>
Date: Wed, 19 May 2004 08:02:14 +0000
Subject: [PATCH] ++ -> +

---
 resource-0.6/english/ParadigmsEng.gf | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/resource-0.6/english/ParadigmsEng.gf b/resource-0.6/english/ParadigmsEng.gf
index da213d86a..45ac5d1d2 100644
--- a/resource-0.6/english/ParadigmsEng.gf
+++ b/resource-0.6/english/ParadigmsEng.gf
@@ -219,8 +219,8 @@ oper
   apReg = \s -> AdjP1 (mkAdj1 s) ;
 
   aGen : Str -> AdjDeg = \s -> case last s of {
-    "y" => mkAdjDeg s (init s ++ "ier") (init s ++ "iest") ;
-    "e" => mkAdjDeg s (s ++ "r") (s ++ "st") ;
+    "y" => mkAdjDeg s (init s + "ier") (init s + "iest") ;
+    "e" => mkAdjDeg s (s + "r") (s + "st") ;
     _   => aReg s
     } ;