Index: openacs-4/packages/lors/lib/course-structure.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/lors/lib/course-structure.adp,v diff -u -r1.11 -r1.12 --- openacs-4/packages/lors/lib/course-structure.adp 16 Apr 2010 19:25:49 -0000 1.11 +++ openacs-4/packages/lors/lib/course-structure.adp 15 Nov 2019 08:30:06 -0000 1.12 @@ -14,7 +14,7 @@ <td class="list" valign="top" style="background-color: #e0e0e0; font-weight: bold; width:20%">#lorsm.Metadata#</td> <td class="list" valign="top" style="background-color: #f0f0f0"> <if @man_metadata@ eq "Yes"> - <if @lorsm_p@><a href="md/?ims_md_id=@man_id@">#lorsm.Yes#</a></if> + <if @lorsm_p;literal@ true><a href="md/?ims_md_id=@man_id@">#lorsm.Yes#</a></if> <else>#lorsm.Yes#</else> </if> <else>#lorsm.No#</else> Index: openacs-4/packages/lors/sql/postgresql/lors-imscp-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/lors/sql/postgresql/lors-imscp-create.sql,v diff -u -r1.11 -r1.12 --- openacs-4/packages/lors/sql/postgresql/lors-imscp-create.sql 9 Feb 2009 03:57:30 -0000 1.11 +++ openacs-4/packages/lors/sql/postgresql/lors-imscp-create.sql 15 Nov 2019 08:30:06 -0000 1.12 @@ -65,7 +65,7 @@ comment on column ims_cp_manifests.parent_man_id is ' Parent manifest. -A manifest could have submanifests. If the manifest doesnt have a parent +A manifest could have submanifests. If the manifest doesn't have a parent then we put 0 '; Index: openacs-4/packages/lors/tcl/lors-imscp-blackboard6-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/lors/tcl/lors-imscp-blackboard6-procs.tcl,v diff -u -r1.13 -r1.14 --- openacs-4/packages/lors/tcl/lors-imscp-blackboard6-procs.tcl 9 May 2018 15:33:32 -0000 1.13 +++ openacs-4/packages/lors/tcl/lors-imscp-blackboard6-procs.tcl 15 Nov 2019 08:30:06 -0000 1.14 @@ -74,14 +74,14 @@ set cc [concat $cc "[lors::imsmd::getAtt $itemx identifierref]"] # gets xml node - set cc [concat $cc $itemx] + lappend cc {*}$itemx set it_list [concat $it_list [list $cc]] set itemxx [$itemx child all item] if { ![empty_string_p $itemxx] } { set it_list [concat $it_list [getItems $itemx]] } - set items [concat $items $cc] + lappend items {*}$cc } } return $it_list Index: openacs-4/packages/lors/tcl/lors-imscp-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/lors/tcl/lors-imscp-procs.tcl,v diff -u -r1.27 -r1.28 --- openacs-4/packages/lors/tcl/lors-imscp-procs.tcl 30 Nov 2018 11:37:38 -0000 1.27 +++ openacs-4/packages/lors/tcl/lors-imscp-procs.tcl 15 Nov 2019 08:30:06 -0000 1.28 @@ -147,7 +147,7 @@ set itemxx [$itemx child all item] if { ![empty_string_p $itemxx] } { incr parent - set cc [concat $cc [list [getItems $itemx $parent]]] + lappend cc [getItems $itemx $parent] incr parent -1 } set items [concat $items [list $cc]] @@ -655,7 +655,7 @@ set subitem [lors::imscp::addItems \ -itm_folder_id $itm_folder_id \ -org_id $p_org_id [lindex $item 13] $item_id $tmp_dir] - set retlist [concat $retlist $subitem] + lappend retlist {*}$subitem } } return $retlist 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.31 -r1.32 --- openacs-4/packages/lorsm/lib/user-lorsm.tcl 10 Jul 2009 15:59:52 -0000 1.31 +++ openacs-4/packages/lorsm/lib/user-lorsm.tcl 15 Nov 2019 08:39:00 -0000 1.32 @@ -138,7 +138,7 @@ display_template { @d_courses.course_url;noquote@ <if @lors_central_p eq 0> - <if @d_courses.admin_p@> + <if @d_courses.admin_p;literal@ true> <i> <a href="${lors_central_url}one-course?item_id= Index: openacs-4/packages/lorsm/tcl/lorsm-import-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/lorsm/tcl/lorsm-import-procs.tcl,v diff -u -r1.10 -r1.11 --- openacs-4/packages/lorsm/tcl/lorsm-import-procs.tcl 9 May 2018 15:33:32 -0000 1.10 +++ openacs-4/packages/lorsm/tcl/lorsm-import-procs.tcl 15 Nov 2019 08:39:00 -0000 1.11 @@ -347,7 +347,7 @@ -indb_p $indb_p \ -files [lors::cr::has_files -fs_dir $fs_dir]] - set all_files [concat $all_files $filesx] + lappend all_files {*}$filesx # get all the directories and files under those dirs @@ -396,7 +396,7 @@ -parent_id $new_cr_folder_id \ -files $files \ -indb_p $indb_p] - set all_files [concat $all_files $filesx] + lappend all_files {*}$filesx } } Index: openacs-4/packages/lorsm/templates/lorsm-default.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/lorsm/templates/lorsm-default.adp,v diff -u -r1.10 -r1.11 --- openacs-4/packages/lorsm/templates/lorsm-default.adp 17 Nov 2008 13:36:43 -0000 1.10 +++ openacs-4/packages/lorsm/templates/lorsm-default.adp 15 Nov 2019 08:39:01 -0000 1.11 @@ -17,7 +17,7 @@ </script> </if> - <if @write_p@> + <if @write_p;literal@ true> <a href="@community_url@/file-storage/file-content-edit?file_id=@content.item_id@<if @return_url@ defined>&@return_url;noquote@</if>" target="_top"><img src="/resources/Edit16.gif" border="0" align="right" alt="image"></a> </if> Index: openacs-4/packages/lorsm/www/admin/course-add-3.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/lorsm/www/admin/course-add-3.tcl,v diff -u -r1.17 -r1.18 --- openacs-4/packages/lorsm/www/admin/course-add-3.tcl 9 May 2018 15:33:32 -0000 1.17 +++ openacs-4/packages/lorsm/www/admin/course-add-3.tcl 15 Nov 2019 08:39:01 -0000 1.18 @@ -113,7 +113,7 @@ -indb_p $indb_p \ -files [lors::cr::has_files -fs_dir $fs_dir]] - set all_files [concat $all_files $filesx] + lappend all_files {*}$filesx # get all the directories and files under those dirs @@ -163,7 +163,7 @@ -parent_id $new_cr_folder_id \ -files $files \ -indb_p $indb_p] - set all_files [concat $all_files $filesx] + lappend all_files {*}$filesx } } } Index: openacs-4/packages/lorsm/www/admin/index.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/lorsm/www/admin/index.tcl,v diff -u -r1.9 -r1.10 --- openacs-4/packages/lorsm/www/admin/index.tcl 9 May 2018 15:33:32 -0000 1.9 +++ openacs-4/packages/lorsm/www/admin/index.tcl 15 Nov 2019 08:39:01 -0000 1.10 @@ -49,7 +49,7 @@ } hasmetadata { label "[_ lorsm.Metadata_1]" display_template { - <if @d_courses.lorsm_p@> + <if @d_courses.lorsm_p;literal@ true> <div style="text-align: center;"> <a href="md/?ims_md_id=@d_courses.ims_md_id@" title="[_ lorsm.See_metadata]">@d_courses.hasmetadata@</a> </div> @@ -99,7 +99,7 @@ } export { label "[_ lorsm.Export]" display_template { - <if @d_courses.lorsm_p@> + <if @d_courses.lorsm_p;literal@ true> <div style="text-align:center;"> <a href="export/?folder_id=@d_courses.folder_id@" title="[_ lorsm.lt_Export_as_IMS_Content]">\[zip\]</a> </div> Index: openacs-4/packages/lorsm/www/admin/md/index.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/lorsm/www/admin/md/index.adp,v diff -u -r1.4 -r1.5 --- openacs-4/packages/lorsm/www/admin/md/index.adp 16 Apr 2010 21:35:12 -0000 1.4 +++ openacs-4/packages/lorsm/www/admin/md/index.adp 15 Nov 2019 08:39:01 -0000 1.5 @@ -8,7 +8,7 @@ <else> <p> #lorsm.lt_No_metadata_record_ex# - <if @write_p@ eq 1> + <if @write_p;literal@ true> <ul> <li><a href="addmd?ims_md_id=@ims_md_id;noquote@">#lorsm.Add_metadata#</a></li> </ul> Index: openacs-4/packages/lorsm/www/delivery/delivery-progress-bar.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/lorsm/www/delivery/delivery-progress-bar.adp,v diff -u -r1.7 -r1.8 --- openacs-4/packages/lorsm/www/delivery/delivery-progress-bar.adp 12 Dec 2008 14:25:39 -0000 1.7 +++ openacs-4/packages/lorsm/www/delivery/delivery-progress-bar.adp 15 Nov 2019 08:39:01 -0000 1.8 @@ -39,7 +39,7 @@ </p> </if> - <if @last_item_p@ true> + <if @last_item_p;literal@ true> <a href="@next_url;noquote@">EXIT COURSE</a> </if> </body>