diff --git a/WINGs/WINGs/WINGs.h b/WINGs/WINGs/WINGs.h
index 68c51843..b34b490c 100644
--- a/WINGs/WINGs/WINGs.h
+++ b/WINGs/WINGs/WINGs.h
@@ -1585,6 +1585,9 @@ void WMPrependTextStream(WMText *tPtr, char *text);
 
 void WMAppendTextStream(WMText *tPtr, char *text);
 
+#define WMClearText(tPtr) WMAppendTextStream \
+    ((tPtr), (NULL))
+
 /* free the text */
 char * WMGetTextStream(WMText *tPtr);