diff --git a/doc/funcref.sgml b/doc/funcref.sgml
index 2a84f7185..65d797baa 100644
--- a/doc/funcref.sgml
+++ b/doc/funcref.sgml
@@ -4919,10 +4919,10 @@ tgi_circle(50, 40, 40);
 
 <quote>
 <descrip>
-<tag/Function/Clear the screen
+<tag/Function/Clear the drawpage
 <tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/
 <tag/Declaration/<tt/void __fastcall__ tgi_clear (void);/
-<tag/Description/Clear the screen
+<tag/Description/Clear the drawpage
 <tag/Limits/<itemize>
 <item>The function is only available as fastcall function, so it may only
 be used in presence of a prototype.
diff --git a/include/tgi.h b/include/tgi.h
index 0ed472c58..941c8a7fe 100644
--- a/include/tgi.h
+++ b/include/tgi.h
@@ -113,7 +113,7 @@ const char* __fastcall__ tgi_geterrormsg (unsigned char code);
 /* Get an error message describing the error in code. */
 
 void __fastcall__ tgi_clear (void);
-/* Clear the screen. */
+/* Clear the drawpage. */
 
 unsigned __fastcall__ tgi_getpagecount (void);
 /* Returns the number of screen pages available. */
diff --git a/libsrc/tgi/tgi_clear.s b/libsrc/tgi/tgi_clear.s
index 65fe4b341..7c4bd0be9 100644
--- a/libsrc/tgi/tgi_clear.s
+++ b/libsrc/tgi/tgi_clear.s
@@ -2,7 +2,7 @@
 ; Ullrich von Bassewitz, 21.06.2002
 ;
 ; void __fastcall__ tgi_clear (void);
-; /* Clear the screen */
+; /* Clear the drawpage */
 
         .include        "tgi-kernel.inc"