diff options
| author | Eugeniy Mikhailov <evgmik@gmail.com> | 2011-02-02 13:55:48 -0500 |
|---|---|---|
| committer | Eugeniy Mikhailov <evgmik@gmail.com> | 2011-02-02 13:55:48 -0500 |
| commit | e2533098067dbfdaca0919706ee31802e16a2ff6 (patch) | |
| tree | c20d6b7ec53ae80ada3a66a9f031c0a341e6ceb3 /GradeBook_lib.tcl | |
| parent | 2f5bd0976a27eaa6c8b4bff78449beb26373677a (diff) | |
| download | GradeBook-e2533098067dbfdaca0919706ee31802e16a2ff6.tar.gz GradeBook-e2533098067dbfdaca0919706ee31802e16a2ff6.zip | |
added code to modify user group
Ignore-this: 1129a92e1ac3e0710df73b741ad2f8f3
darcs-hash:20110202185548-067c0-269cae67ba625818d056adfa0e80b68f5094b886.gz
Diffstat (limited to 'GradeBook_lib.tcl')
| -rwxr-xr-x | GradeBook_lib.tcl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/GradeBook_lib.tcl b/GradeBook_lib.tcl index 26ff60a..42dd708 100755 --- a/GradeBook_lib.tcl +++ b/GradeBook_lib.tcl @@ -546,7 +546,7 @@ proc ChangeGroupName {permission_list user } { set FirstName [SelectColValue4User FirstName $modified_user] set LastName [SelectColValue4User LastName $modified_user] puts "<div class=changegroupname>" - puts "New group name for $FirstName $LastName $modified_user" + puts "New group name for $FirstName $LastName with user name $modified_user" puts "<form name=\"input\" action=\"$script_name\" method=\"post\" />" puts {GroupName: <select name="groupname">} # opt list has option name and corresponding text pairs |