diff --git a/source/printlist.pas b/source/printlist.pas
index 918e932a..c89df59d 100644
--- a/source/printlist.pas
+++ b/source/printlist.pas
@@ -67,6 +67,7 @@ var
 begin
   // print!
   Screen.Cursor := crHourglass;
+  list := nil;
   // which ListView to print?
   case Mainform.PageControlMain.ActivePageIndex of
     0: case Mainform.PageControlHost.ActivePageIndex of