Fix cursor trail Issue #6

SMerrony · Nov 11, 2022 · 1d617f1 · 1d617f1
1 parent beafa2f
commit 1d617f1
Show file tree

Hide file tree

Showing 2 changed files with 6 additions and 1 deletion.
diff --git a/changelog b/changelog
@@ -1,12 +1,16 @@
 dashera (0.12.2) stable; urgency=low
 
   [SMerrony]
+  * Fix issue with Edit|Paste not actually pasting into data stream
+  * Fix issue with cursor sometimes leaving trail on screen
   * Add View menu
   * Add View|History to display terminal history, remove scrollback
   * Move Edit|Resize to View|Resize Terminal
   * Upgrade Gtkada to v.23
+  * Embed font and icon resources in code using 'are'
+  * Add `-amber` and `-white` options to emulate different phosphor colours
 
- -- SMerrony <merrony@gmail.com>  Fri, 4 Nov 2022 10:00:00 +0200
+ -- SMerrony <merrony@gmail.com>  Fri, 11 Nov 2022 10:00:00 +0200
 
 dashera (0.12.1) stable; urgency=low
 

diff --git a/src/display_p.adb b/src/display_p.adb
@@ -110,6 +110,7 @@ package body Display_P is
 
       procedure Set_Cursor (X, Y : Natural) is
       begin
+         Disp.Cells (Disp.Cursor_Y, Disp.Cursor_X).Set_Dirty;
          Disp.Cursor_X := X;
          Disp.Cursor_Y := Y;
       end Set_Cursor;