diff options
| author | Eugeniy Mikhailov <evgmik@gmail.com> | 2012-02-16 13:33:32 -0500 |
|---|---|---|
| committer | Eugeniy Mikhailov <evgmik@gmail.com> | 2012-02-16 13:33:32 -0500 |
| commit | 2992970653d9577e1cbfe5f0f938d3201f12a976 (patch) | |
| tree | 0eba8372ef057e01e027cee4a5a34c112f12cf47 /GradeBook_lib.tcl | |
| parent | f507c877a4194a52315feec6698d36af5b0bfb06 (diff) | |
| download | GradeBook-2992970653d9577e1cbfe5f0f938d3201f12a976.tar.gz GradeBook-2992970653d9577e1cbfe5f0f938d3201f12a976.zip | |
added link to statistics url into the footer
Diffstat (limited to 'GradeBook_lib.tcl')
| -rwxr-xr-x | GradeBook_lib.tcl | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/GradeBook_lib.tcl b/GradeBook_lib.tcl index a20c890..4a2e93f 100755 --- a/GradeBook_lib.tcl +++ b/GradeBook_lib.tcl @@ -960,12 +960,14 @@ proc html_Show_Classes_List {permission_list user} { proc htmlFooter {permission_list} { array set permission $permission_list global VERSION + global GradebookServerConfig global execution_start_time set execution_end_time [clock microseconds] set execution_time [ format "%.3g" [expr { ($execution_end_time - $execution_start_time)/1e6}] ] puts "<div class=\"footer\">" puts "Execution time $execution_time seconds. <br>" - puts "GradeBook $VERSION by Eugeniy E. Mikhailov" + puts "GradeBook $VERSION by Eugeniy E. Mikhailov." + puts "<p> <a href=\"$GradebookServerConfig(html_access_stats_url)\">Access statistics.<a>" puts "</div>" } |