From 81deaee653473afa1b2fe61b44ba8051640314f0 Mon Sep 17 00:00:00 2001
From: Lucas Bajolet <r4pass@hotmail.com>
Date: Wed, 28 Jan 2015 10:58:48 -0500
Subject: [PATCH] lib/standard/ropes: Fixed concatenation routine for Concat +
 FlatString

Signed-off-by: Lucas Bajolet <r4pass@hotmail.com>
---
 lib/standard/ropes.nit |    2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lib/standard/ropes.nit b/lib/standard/ropes.nit
index 8186ec9..68593fd 100644
--- a/lib/standard/ropes.nit
+++ b/lib/standard/ropes.nit
@@ -155,7 +155,7 @@ private class Concat
 		else
 			var r = right
 			var rlen = r.length
-			if rlen + slen > maxlen then return new Concat(left, new Concat(r, s))
+			if rlen + slen > maxlen then return new Concat(self, s)
 			return new Concat(left, r + s)
 		end
 	end
-- 
1.7.9.5