*** empty log message ***

1999-08-04 13:04:26 +00:00
parent ff7b575b72
commit 28a60bb64a
1 changed files with 2 additions and 0 deletions
--- a/harbour/tests/working/testread.prg
+++ b/harbour/tests/working/testread.prg
@@ -21,6 +21,8 @@ function Main()
   local cWish := "Power   "
   local GetList := {}

+   CLS
+
   @ 2, 2 SAY "Enter your name:" GET cName
   @ 4, 2 SAY "Enter your wish:" GET cWish
   READ