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 @@
#lorsm.Metadata# |
- #lorsm.Yes#
+ #lorsm.Yes#
#lorsm.Yes#
#lorsm.No#
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@
-
+
&@return_url;noquote@" target="_top">
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 {
-
+
@@ -99,7 +99,7 @@
} export {
label "[_ lorsm.Export]"
display_template {
-
+
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 @@
#lorsm.lt_No_metadata_record_ex#
-
+
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 @@
-
+
EXIT COURSE
|