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 | |
parent | f507c877a4194a52315feec6698d36af5b0bfb06 (diff) | |
download | GradeBook-2992970653d9577e1cbfe5f0f938d3201f12a976.tar.gz GradeBook-2992970653d9577e1cbfe5f0f938d3201f12a976.zip |
added link to statistics url into the footer
-rwxr-xr-x | GradeBook_lib.tcl | 4 | ||||
-rw-r--r-- | gb_config.template | 1 |
2 files changed, 4 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>" } diff --git a/gb_config.template b/gb_config.template index 58b899b..63d040d 100644 --- a/gb_config.template +++ b/gb_config.template @@ -10,6 +10,7 @@ array set GradebookServerConfig [list \ use_icons true \ grades_db_dir "./courses" \ passwords_db_file "./passwd.db" \ + html_access_stats_url "/~evmik/grade_book_stats/" \ ] # vim: ts=2 sw=2 foldmethod=indent: |