summaryrefslogtreecommitdiff
path: root/filo.f90
diff options
context:
space:
mode:
Diffstat (limited to 'filo.f90')
-rw-r--r--filo.f904
1 files changed, 2 insertions, 2 deletions
diff --git a/filo.f90 b/filo.f90
index 3918d8e..c358aa6 100644
--- a/filo.f90
+++ b/filo.f90
@@ -250,8 +250,7 @@ contains
character, dimension(:), intent(in)::arr
character, dimension(:), allocatable::ctmp
- integer::i
-
+
allocate(ctmp(er%size()+size(arr)))
ctmp(1:er%size()) = er%chars
ctmp(er%size()+1:er%size()+size(arr)) = arr
@@ -415,6 +414,7 @@ contains
deltax = E%screencols - E%cx + 1
E%cx = E%cx - deltax
E%coloff = E%coloff + deltax
+ Print *, "new offset: ", E%coloff, "->", E%screencols, E%cx
end if
else
call editorRowDelChar(E%row(filerow), filecol - 1)