Index: openacs-4/packages/xowiki/www/portlets/weblog-mini-calendar.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/www/portlets/weblog-mini-calendar.tcl,v
diff -u -N -r1.19 -r1.20
--- openacs-4/packages/xowiki/www/portlets/weblog-mini-calendar.tcl	7 Aug 2017 23:48:31 -0000	1.19
+++ openacs-4/packages/xowiki/www/portlets/weblog-mini-calendar.tcl	24 Dec 2017 12:51:38 -0000	1.20
@@ -24,9 +24,11 @@
 }
 
 # Get the current month, day, and the first day of the month
-if {[catch {
+ad_try {
   dt_get_info $date
-} errmsg]} {
+} on error {errorMsg} {
+  # if dt_get_info fails from the provided date, try it with the
+  # sysdate.
   set date [dt_sysdate]
   dt_get_info $date
 }