Index: openacs-4/packages/lorsm/www/course-structure.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/lorsm/www/Attic/course-structure.tcl,v diff -u -r1.7.2.1 -r1.7.2.1.2.1 --- openacs-4/packages/lorsm/www/course-structure.tcl 13 Jun 2005 15:10:56 -0000 1.7.2.1 +++ openacs-4/packages/lorsm/www/course-structure.tcl 27 Dec 2006 11:01:03 -0000 1.7.2.1.2.1 @@ -118,7 +118,7 @@ for { set i 0 } { $i < [expr $indent_array($item_id)-1]} { incr i } { append indent \"      \" } - if {![empty_string_p $identifierref]} {set href \"$indent$item_title\"} else {set href $item_title}]" } + if {![empty_string_p $identifierref]} {set href \"$indent$item_title\"} else {set href [concat $indent$item_title]}]" } { Edit "\#lorsm.Edit\#" "no_sort" "[if {![empty_string_p $identifierref]} { if { $lorsm_p } { set href \"[_ lorsm.Edit_1]\"} else { set href \"Edit\" }}]"} { metadata "\#lorsm.Metadata_1\#" "no_sort" "[if {$hasmetadata == \"f\"} { if { $lorsm_p } { set hasmetadata \"No\"} else { set hasmetadata \"No\"} } else { if { $lorsm_p } { set hasmetadata \"Yes\"} else { set hasmetadata \"Yes\"}}]" } { type "\#lorsm.Type\#" "no_sort" "$type" }