From 507aec47d58e78458c8a6a2f5e5378a029160711 Mon Sep 17 00:00:00 2001
From: Jeffrey Armstrong <jeff@approximatrix.com>
Date: Wed, 29 Dec 2021 20:57:48 -0500
Subject: Fixed appending new characters at end of line.

---
 filo.f90 | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

(limited to 'filo.f90')

diff --git a/filo.f90 b/filo.f90
index c358aa6..96e566e 100644
--- a/filo.f90
+++ b/filo.f90
@@ -221,7 +221,7 @@ contains
         if(at > er%size()) then
         
             padlen = at - er%size()
-            allocate(ctmp(er%size() + padlen + 1))
+            allocate(ctmp(er%size() + padlen))
             ctmp(1:er%size()) = er%chars
             if(padlen > 0) then
                 ctmp(er%size()+1:er%size()+padlen) = ' '
@@ -237,7 +237,6 @@ contains
         
         ctmp(at) = c
         call move_alloc(ctmp, er%chars)
-        
         E%dirty = E%dirty + 1
         
     end subroutine editorRowInsertChar
-- 
cgit v1.2.3