Index: openacs-4/www/blank-compat.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/www/blank-compat.tcl,v
diff -u -r1.1.2.1 -r1.1.2.2
--- openacs-4/www/blank-compat.tcl	2 Mar 2007 16:12:35 -0000	1.1.2.1
+++ openacs-4/www/blank-compat.tcl	12 Mar 2007 20:16:54 -0000	1.1.2.2
@@ -8,6 +8,10 @@
   $Id$
 }
 
+if { [template::util::is_nil title] } {
+    set title [ad_conn instance_name]
+}
+
 if {![array exists doc]} {
     array set doc [list]
 }
@@ -23,6 +27,8 @@
     if {[info exists $from]} {
         ns_log warning "blank-compat: [ad_conn file] uses deprecated property $from instead of $to."
         set $to [set $from]
+    } else {
+        set $to {}
     }
 }