Index: openacs-4/packages/acs-bootstrap-installer/tcl/00-proc-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-bootstrap-installer/tcl/00-proc-procs.tcl,v
diff -u -r1.41.2.10 -r1.41.2.11
--- openacs-4/packages/acs-bootstrap-installer/tcl/00-proc-procs.tcl	16 Oct 2013 19:37:01 -0000	1.41.2.10
+++ openacs-4/packages/acs-bootstrap-installer/tcl/00-proc-procs.tcl	5 Dec 2013 11:04:13 -0000	1.41.2.11
@@ -294,6 +294,7 @@
     if { [llength $arg_list] > 0 } {
         set first_arg [lindex $arg_list 0]
         if { [llength $first_arg] == 0 || [llength $first_arg] > 2 } {
+	    ns_log Warning "Convert old (deprecated) style proc: $proc_name"
             set new_arg_list [list]
             foreach { switch default_value } $first_arg {
                 lappend new_arg_list [list $switch $default_value]
@@ -415,8 +416,9 @@
 
     # Backward compatibility: set proc_doc and proc_source_file
     nsv_set proc_doc $proc_name [lindex $doc_elements(main) 0]
-    if { [nsv_exists proc_source_file $proc_name] \
-	    && [nsv_get proc_source_file $proc_name] ne [info script]  } {
+    if { [nsv_exists proc_source_file $proc_name] 
+	 && [nsv_get proc_source_file $proc_name] ne [info script]  
+     } {
         ns_log Warning "Multiple definition of $proc_name in [nsv_get proc_source_file $proc_name] and [info script]"
     }
     nsv_set proc_source_file $proc_name [info script]