From 5a263326b284c1864766f40d54ef08bfe77dca11 Mon Sep 17 00:00:00 2001
From: cage <cage@invalid>
Date: Fri, 11 Mar 2022 16:30:11 +0100
Subject: [PATCH] - fixed a bit 'win-clear', calling wclear wa not needed.

---
 src/windows.lisp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/windows.lisp b/src/windows.lisp
index 6bd5892..d6c60a9 100644
--- a/src/windows.lisp
+++ b/src/windows.lisp
@@ -126,7 +126,7 @@
                     (>= ,width  ,min-valid-width))
            ,@body)))))
 
-(defun win-clear (window &key (redraw t))
+(defun win-clear (window &key (redraw nil))
   "Clear window content"
   (clear (croatoan-window window) :target :window :redraw redraw))