diff options
| author | Eugeniy Mikhailov <evgmik@gmail.com> | 2012-01-20 23:55:25 -0500 |
|---|---|---|
| committer | Eugeniy Mikhailov <evgmik@gmail.com> | 2012-01-20 23:55:25 -0500 |
| commit | 07265e8f5cd35664fef0bf01ce2e9922fdb26d43 (patch) | |
| tree | a96473acde02c24eefdc9dd975bb20f87702f6c2 /GradeBook_lib.tcl | |
| parent | fe52fc6bc09893666831058cf1e5a46a061fa885 (diff) | |
| download | GradeBook-07265e8f5cd35664fef0bf01ce2e9922fdb26d43.tar.gz GradeBook-07265e8f5cd35664fef0bf01ce2e9922fdb26d43.zip | |
added proc for database selector html header
Diffstat (limited to 'GradeBook_lib.tcl')
| -rwxr-xr-x | GradeBook_lib.tcl | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/GradeBook_lib.tcl b/GradeBook_lib.tcl index 4902ee2..8d4fffc 100755 --- a/GradeBook_lib.tcl +++ b/GradeBook_lib.tcl @@ -1789,6 +1789,16 @@ puts { } } +proc htmlHeaderDBSelector {} { +puts { +<html xmlns="http://www.w3.org/1999/xhtml"> +<head> + <meta http-equiv="Content-Type" content= "text/html; charset=us-ascii" /> + <title>Grade Books Selector</title> + <link rel="stylesheet" type="text/css" href="/~evmik/GradeBook.css" /> +</head> +} +} ##################### end of procs #################################### |