Index: openacs-4/packages/acs-developer-support/lib/footer.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-developer-support/lib/footer.tcl,v
diff -u -r1.11 -r1.12
--- openacs-4/packages/acs-developer-support/lib/footer.tcl	9 Nov 2008 23:29:22 -0000	1.11
+++ openacs-4/packages/acs-developer-support/lib/footer.tcl	9 Jan 2010 01:56:09 -0000	1.12
@@ -7,6 +7,12 @@
 
 if { $show_p } {
 
+    if {[ns_cache get ds_page_bits "$request:error" errors]} {
+        set errcount [llength $errors]
+    } else {
+        set errcount 0
+    }
+
     set page_fragment_cache_p [ds_page_fragment_cache_enabled_p]
 
     set ds_url [ds_support_url]
@@ -87,79 +93,4 @@
         }
         
     }
-
-    # Profiling information
-    global ds_profile__total_ms ds_profile__iterations
-
-    template::list::create -name profiling -multirow profiling -elements {
-	file_links {
-	    label "Ops"
-	    display_template {
-		@profiling.file_links;noquote@
-	    }
-	}
-	tag {
-	    label "Tag"
-	}
-	num_iterations {
-	    label "Iterations"
-	}
-	total_ms {
-	    label "Total time"
-	}
-	ms_per_iteration {
-	    label "Avg. time per iteration"
-	}
-	size {
-	    label "Size"
-	}
-    }
-
-    multirow create profiling tag num_iterations total_ms ms_per_iteration file_links size
-
-    if {[ns_cache get ds_page_bits "$request:error" errors]} {
-        set errcount [llength $errors]
-    } else {
-        set errcount 0
-    }
-    if { [info exists ds_profile__total_ms] } {
-        foreach tag [lsort [array names ds_profile__iterations]] {
-            if {[file exists $tag]} {
-                set file_links "<a href=\"${ds_url}send?fname=[ns_urlencode $tag]\" title=\"edit\">e</a>"
-                append file_links " <a href=\"${ds_url}send?code=[ns_urlencode $tag]\" title=\"compiled code\">c</a>"
-            } else {
-                set file_links {}
-            }
-
-            if { $page_fragment_cache_p } {
-                if { [string match *.adp $tag]} {
-                    append file_links " <a href=\"${ds_url}send?output=$request:[ns_urlencode $tag]\" title=\"output\">o</a>"
-                    if {[ns_cache get ds_page_bits "$request:$tag" dummy]} {
-                        set size [string length $dummy]
-                    } else {
-                        set size {?}
-                    }
-                } else {
-                    append file_links " x"
-                    set size -
-                }
-            } else { 
-                set size {}
-            }
-
-            if {[info exists ds_profile__total_ms($tag)]} {
-                set total_ms [lc_numeric [set ds_profile__total_ms($tag)]]
-                if {[info exists ds_profile__iterations($tag)]
-                    && $ds_profile__iterations($tag) > 0} {
-                        set ms_per_iteration [lc_numeric [expr {1.0*$ds_profile__total_ms($tag)/$ds_profile__iterations($tag)}]]
-                } else {
-                    set ms_per_iteration -
-                }
-            } else {
-                set total_ms -
-                set ms_per_iteration -
-            }
-            multirow append profiling $tag [set ds_profile__iterations($tag)] $total_ms $ms_per_iteration $file_links $size
-        }
-    }
 }