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.15 -r1.16 --- openacs-4/packages/lors/tcl/lors-imscp-blackboard6-procs.tcl 15 Nov 2019 08:31:12 -0000 1.15 +++ openacs-4/packages/lors/tcl/lors-imscp-blackboard6-procs.tcl 15 Nov 2019 08:34:20 -0000 1.16 @@ -204,7 +204,7 @@ @option file filename @author Ernie Ghiglione (ErnieG@mm.st) } { - # open xml file + # open XML file set doc [dom parse [::tdom::xmlReadFile $file]] # coursetoc set coursetoc [$doc documentElement] @@ -239,7 +239,7 @@ @option file filename @author Ernie Ghiglione (ErnieG@mm.st) } { - # open xml file + # open XML file set doc [dom parse [::tdom::xmlReadFile $file]] # content @@ -326,14 +326,14 @@ # set txt [ad_html_text_convert -from "text/plain" -to "text/html" $txt] } - # saves it on a new html file + # saves it on a new HTML file set f_handler [open $filename w+] fconfigure $f_handler -encoding utf-8 puts -nonewline $f_handler " \ $txt \" close $f_handler - # returns what is is an href for resources + # returns what is an href for resources return $filename } @@ -368,7 +368,7 @@ @option file filename @author Ernie Ghiglione (ErnieG@mm.st) } { - # open xml file + # open XML file set doc [dom parse [::tdom::xmlReadFile $file]] # content set announcement [$doc documentElement] @@ -517,7 +517,7 @@ @option file filename @author Ernie Ghiglione (ErnieG@mm.st) } { - # open xml file + # open XML file set doc [dom parse [::tdom::xmlReadFile $file]] # content set forum [$doc documentElement] @@ -623,7 +623,7 @@ @option file filename @author Ernie Ghiglione (ErnieG@mm.st) } { - # open xml file + # open XML file set doc [dom parse [::tdom::xmlReadFile $tmp_dir/$file]] # gets the manifest tree @@ -760,7 +760,7 @@ # this corsetoc item is childless, # therefore we nuke it (as it is an # empty folder - ns_log Notice "Therefore [lindex $item 0] [lindex $item 1] ([lindex $item 2]) we delete it.." + ns_log Notice "Therefore, [lindex $item 0] [lindex $item 1] ([lindex $item 2]) we delete it.." [lindex $item 2] delete @@ -989,7 +989,7 @@ # if has_packages != 0 then there was at # least one file was declared as a package - # Therefore we ignore $content + # Therefore, we ignore $content # This is an assumption as I haven't seen # files AND packages within the same resource. 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.28 -r1.29 --- openacs-4/packages/lors/tcl/lors-imscp-procs.tcl 15 Nov 2019 08:30:06 -0000 1.28 +++ openacs-4/packages/lors/tcl/lors-imscp-procs.tcl 15 Nov 2019 08:34:20 -0000 1.29 @@ -238,7 +238,7 @@ } ######################################################################################### - # Since now we dont use acs-objects for the manifest, then a new cr_item and revision + # Since now we don't use acs-objects for the manifest, then a new cr_item and revision # needs to be done to store the manifest. The cr_item and cr_revision are created here # in orther to use the CR API. @@ -401,7 +401,7 @@ } #--------------------------------------------------------------------------------------# - # Since now we dont use acs-objects for the organizations, then a new cr_item and revision + # Since now we don't use acs-objects for the organizations, then a new cr_item and revision # needs to be done to store it. The cr_item and cr_revision are created here # in orther to use the CR API. The item name probably has to change @@ -519,7 +519,7 @@ } #--------------------------------------------------------------------------------------# - # Since now we dont use acs-objects for the item, then a new cr_item and revision + # Since now we don't use acs-objects for the item, then a new cr_item and revision # needs to be done to store it. The cr_item and cr_revision are created here # in orther to use the CR API. The item name probably has to change @@ -553,7 +553,7 @@ db_dml set_sort_order {} # DRB: I stripped out a bunch of commented-out permission twiddling that leads me - # to believe this is pretty much bogus. However I've left in the toggle inherit. + # to believe this is pretty much bogus. However, I've left in the toggle inherit. # This doesn't lead to a dotlrn dependency per se because this is driven throughout # by parameters and an extension to the course XML (manifest? haven't looked closely). # My work for MGH doesn't extend to fixing every stupid thing I find, just getting @@ -705,7 +705,7 @@ } #--------------------------------------------------------------------------------------# - # Since now we dont use acs-objects for the resource, then a new cr_item and revision + # Since now we don't use acs-objects for the resource, then a new cr_item and revision # needs to be done to store it. The cr_item and cr_revision are created here # in orther to use the CR API. The item name probably has to change @@ -805,7 +805,7 @@ -filename:required {-hasmetadata ""} } { - Adds a files to ims_cp_files table (Note: we are not adding files to the respository here). + Adds a file to ims_cp_files table (Note: we are not adding files to the repository here). @option file_id file_id for file (cr_revision). @option res_id the resource id. Index: openacs-4/packages/lors/tcl/lors-imsmd-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/lors/tcl/lors-imsmd-procs.tcl,v diff -u -r1.16 -r1.17 --- openacs-4/packages/lors/tcl/lors-imsmd-procs.tcl 15 Nov 2019 08:31:12 -0000 1.16 +++ openacs-4/packages/lors/tcl/lors-imsmd-procs.tcl 15 Nov 2019 08:34:20 -0000 1.17 @@ -25,7 +25,7 @@ namespace eval lors::imsmd { ad_proc -public getAtt {doc attr_name} { - getAtt Gets attributes for an specific element + getAtt Gets attributes for a specific element @param doc Document @param attr_name Attribute we want to fetch