Index: openacs-4/packages/lorsm/lib/user-lorsm.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/lorsm/lib/user-lorsm.tcl,v diff -u -r1.20 -r1.20.2.1 --- openacs-4/packages/lorsm/lib/user-lorsm.tcl 6 Mar 2008 11:50:43 -0000 1.20 +++ openacs-4/packages/lorsm/lib/user-lorsm.tcl 11 May 2008 02:16:35 -0000 1.20.2.1 @@ -200,16 +200,16 @@ limit 1" ] } { #item has no track for the user #the icon should be the same as per "not yet visited" - append icon "\"Not" + append icon "\"Not" } else { switch -regexp $lesson_status { - null { append icon "\"Not" } - incomplete { append icon "\"Incomplete\"" } - complete { append icon "\"Completed\"" } - failed { append icon "\"Failed\"" } - "not attempted" { append icon "\"Not" } - passed { append icon "\"Passed\"" } - default { append icon " $lesson_status ** \"$lesson_status\""} + null { append icon "\"Not" } + incomplete { append icon "\"Incomplete\"" } + complete { append icon "\"Completed\"" } + failed { append icon "\"Failed\"" } + "not attempted" { append icon "\"Not" } + passed { append icon "\"Passed\"" } + default { append icon " $lesson_status ** \"$lesson_status\""} } } set lesson_status $icon