Index: openacs-4/packages/news/tcl/news-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/news/tcl/news-procs.tcl,v
diff -u -N -r1.12 -r1.13
--- openacs-4/packages/news/tcl/news-procs.tcl	6 Oct 2003 12:11:23 -0000	1.12
+++ openacs-4/packages/news/tcl/news-procs.tcl	22 Oct 2003 16:12:39 -0000	1.13
@@ -145,6 +145,8 @@
     }
 
     set now_seconds [clock scan now]
+    set n_days_until_archive {}
+
     if { ![empty_string_p $archive_date] } { 
         set archive_date_seconds [clock scan $archive_date]