diff options
-rw-r--r-- | filo.f90 | 3 |
1 files changed, 1 insertions, 2 deletions
@@ -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 |