aboutsummaryrefslogtreecommitdiff
path: root/GradeBook_lib.tcl
diff options
context:
space:
mode:
authorEugeniy Mikhailov <evgmik@gmail.com>2012-01-21 21:30:14 -0500
committerEugeniy Mikhailov <evgmik@gmail.com>2012-01-21 21:30:14 -0500
commitce501fcac9113539eb04fb0f3d7229941ddd8b73 (patch)
tree2bd03dd281c355fe19d2ad6f44dd60c0316a89da /GradeBook_lib.tcl
parentff7c2aafec895171977e8e9aa8613b85d3b5e391 (diff)
downloadGradeBook-ce501fcac9113539eb04fb0f3d7229941ddd8b73.tar.gz
GradeBook-ce501fcac9113539eb04fb0f3d7229941ddd8b73.zip
debug priority assigned
Diffstat (limited to 'GradeBook_lib.tcl')
-rwxr-xr-xGradeBook_lib.tcl4
1 files changed, 2 insertions, 2 deletions
diff --git a/GradeBook_lib.tcl b/GradeBook_lib.tcl
index 1f5670b..a92d1a2 100755
--- a/GradeBook_lib.tcl
+++ b/GradeBook_lib.tcl
@@ -691,7 +691,7 @@ proc htmlDBout {db permission_list user {sort_col {}}} {
if { $sort_col == {} } {
set sort_col $defSortCol
- dbg "empty sort col changed to $sort_col" 4
+ dbg "empty sort col changed to $sort_col" msg_level_info
}
# testing for the existense of the sorting column
set eval_str [concat SELECT * FROM GradesTable ORDER BY \"$sort_col\"]
@@ -1728,7 +1728,7 @@ proc ShowControls { permission_list user } {
global script_name
#global grades_category
set grades_category [ get_grades_category ]
- dbg "outputing contol list"
+ dbg "outputting contol list" msg_level_info
puts "<div class=\"controls\">"
set action_list [ list \
defaultview "Refresh"\