Index: openacs-4/packages/ajaxhelper/www/doc/head-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ajaxhelper/www/doc/head-procs.tcl,v diff -u -N -r1.3 -r1.4 --- openacs-4/packages/ajaxhelper/www/doc/head-procs.tcl 28 Mar 2018 17:00:40 -0000 1.3 +++ openacs-4/packages/ajaxhelper/www/doc/head-procs.tcl 18 Apr 2018 22:25:03 -0000 1.4 @@ -273,7 +273,7 @@ if {$identifier eq "anonymous"} { lappend body_handlers($event,anonymous) $script } else { - set body_handers($event,$identifier) $script + set body_handlers($event,$identifier) $script } } Index: openacs-4/packages/forums/tcl/messages-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/forums/tcl/messages-procs.tcl,v diff -u -N -r1.50 -r1.51 --- openacs-4/packages/forums/tcl/messages-procs.tcl 31 Jan 2018 20:25:55 -0000 1.50 +++ openacs-4/packages/forums/tcl/messages-procs.tcl 18 Apr 2018 22:25:03 -0000 1.51 @@ -52,29 +52,29 @@ } on_error { db_abort_transaction - + # Check to see if the message with a message_id matching the # message_id argument was in the database before calling # this procedure. If so, the error is due to a double click # and we should continue without returning an error. - + if {$original_message_id ne ""} { - # The was a non-null message_id argument + # The was a non-null message_id argument if {[db_string message_exists_p {}]} { return $message_id } else { # OK - it wasn't a simple double-click, so bomb ad_return_error \ "OACS Internal Error" \ - "Error in forums::message::new - $errmsg" + "Error in forum::message::new - $errmsg" ad_script_abort } } } return $message_id } - + ad_proc -public forum::message::do_notifications { {-message_id:required} {-user_id ""} @@ -307,7 +307,7 @@ } { db_exec_plsql thread_open {} } - + ad_proc -public forum::message::get_attachments { {-message_id:required} } { Index: openacs-4/packages/lorsm/www/delivery/exit.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/lorsm/www/delivery/exit.tcl,v diff -u -N -r1.7 -r1.8 --- openacs-4/packages/lorsm/www/delivery/exit.tcl 27 Mar 2018 17:08:50 -0000 1.7 +++ openacs-4/packages/lorsm/www/delivery/exit.tcl 18 Apr 2018 22:25:03 -0000 1.8 @@ -29,7 +29,7 @@ if { $lorsmstudenttrack == 0 } { lorsm::track::exit -track_id $track_id } else { - #speficic for courses for which istrackable is on + #specific for courses for which istrackable is on lorsm::track::exit -track_id $lorsmstudenttrack } Index: openacs-4/packages/lorsm/www/delivery/servlet.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/lorsm/www/delivery/servlet.tcl,v diff -u -N -r1.12 -r1.13 --- openacs-4/packages/lorsm/www/delivery/servlet.tcl 17 Apr 2018 14:47:03 -0000 1.12 +++ openacs-4/packages/lorsm/www/delivery/servlet.tcl 18 Apr 2018 22:25:03 -0000 1.13 @@ -471,7 +471,7 @@ if { $lorsmstudenttrack == "" || $lorsmstudenttrack == 0 } { lorsm::track::exit -track_id $currenttrackid } else { - #speficic for courses for which istrackable is on + #specific for courses for which istrackable is on lorsm::track::exit -track_id $lorsmstudenttrack } @@ -488,7 +488,7 @@ lorsm::track::exit -track_id $currenttrackid } else { - #speficic for courses for which istrackable is on + #specific for courses for which istrackable is on lorsm::track::exit -track_id $lorsmstudenttrack } ns_return 200 text/plain "OK" Index: openacs-4/packages/lorsm/www/delivery-scorm/exit.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/lorsm/www/delivery-scorm/exit.tcl,v diff -u -N -r1.2 -r1.3 --- openacs-4/packages/lorsm/www/delivery-scorm/exit.tcl 27 Mar 2018 17:08:50 -0000 1.2 +++ openacs-4/packages/lorsm/www/delivery-scorm/exit.tcl 18 Apr 2018 22:25:03 -0000 1.3 @@ -29,7 +29,7 @@ if { ! [empty_string_p $lorsmstudenttrack] } { if { $lorsmstudenttrack == 0 } { lorsm::track::exit -track_id $track_id } else { - #speficic for courses for which istrackable is on + #specific for courses for which istrackable is on lorsm::track::exit -track_id $lorsmstudenttrack } ns_log $level "SCORM exiting a scorm course which didn't actually FINISH" } else { Index: openacs-4/packages/lorsm/www/delivery-scorm/servlet.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/lorsm/www/delivery-scorm/servlet.tcl,v diff -u -N -r1.4 -r1.5 --- openacs-4/packages/lorsm/www/delivery-scorm/servlet.tcl 17 Apr 2018 14:47:03 -0000 1.4 +++ openacs-4/packages/lorsm/www/delivery-scorm/servlet.tcl 18 Apr 2018 22:25:03 -0000 1.5 @@ -370,7 +370,7 @@ #even if user closes the course without passing by FINISH if { $lorsmstudenttrack == "" || $lorsmstudenttrack == 0 } { lorsm::track::exit -track_id $currenttrackid } else { - #speficic for courses for which istrackable is on + #specific for courses for which istrackable is on lorsm::track::exit -track_id $lorsmstudenttrack } ns_log $level "lorsm - post LMSCommit (trackid=$currenttrackid)" ns_return 200 text/plain "OK" @@ -381,7 +381,7 @@ ad_set_client_property lorsm currenttrackid "" if { $lorsmstudenttrack == "" || $lorsmstudenttrack == 0 } { lorsm::track::exit -track_id $currenttrackid } else { - #speficic for courses for which istrackable is on + #specific for courses for which istrackable is on lorsm::track::exit -track_id $lorsmstudenttrack } ns_return 200 text/plain "OK" ns_log $level "lorsm - post LMSFinish (trackid=$currenttrackid) sent ok to applet" Index: openacs-4/packages/xotcl-core/tcl/ical-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xotcl-core/tcl/ical-procs.tcl,v diff -u -N -r1.17 -r1.18 --- openacs-4/packages/xotcl-core/tcl/ical-procs.tcl 20 Mar 2018 07:16:30 -0000 1.17 +++ openacs-4/packages/xotcl-core/tcl/ical-procs.tcl 18 Apr 2018 22:25:03 -0000 1.18 @@ -287,7 +287,7 @@ } # - # Subclass ::xo::ProtocolHander for dav (as used by ical) + # Subclass ::xo::ProtocolHandler for dav (as used by ical) # Class create ::xo::dav -superclass ProtocolHandler -parameter { {url /webdav} Index: openacs-4/packages/xotcl-request-monitor/tcl/throttle_mod-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xotcl-request-monitor/tcl/throttle_mod-procs.tcl,v diff -u -N -r1.52 -r1.53 --- openacs-4/packages/xotcl-request-monitor/tcl/throttle_mod-procs.tcl 10 Apr 2018 06:34:36 -0000 1.52 +++ openacs-4/packages/xotcl-request-monitor/tcl/throttle_mod-procs.tcl 18 Apr 2018 22:25:03 -0000 1.53 @@ -1384,15 +1384,15 @@ # down. # ::xotcl::Object setExitHandler { - ns_log notice "::thottle: exiting" + ns_log notice "::throttle: exiting" dump write -sync true # # Delete all users objects, that will flush all activity data to # the tables if configured # foreach obj [Users info instances] {$obj destroy} - ns_log notice "::thottle speficic exist handler finished" + ns_log notice "::throttle specific exist handler finished" } #ns_log notice "============== Thread initialized ====================" @@ -1426,15 +1426,15 @@ } throttle proc destroy {} { - #puts stderr thottle-DESTROY - ns_log notice thottle-DESTROY-shutdownpending->[ns_info shutdownpending] + #puts stderr throttle-DESTROY + ns_log notice throttle-DESTROY-shutdownpending->[ns_info shutdownpending] if {[ns_info shutdownpending] && [nsv_exists ::xotcl::THREAD [self]]} { set tid [nsv_get ::xotcl::THREAD [self]] - ns_log notice =========thottle-DESTROY-shutdown==========================$tid-??[::thread::exists $tid] + ns_log notice =========throttle-DESTROY-shutdown==========================$tid-??[::thread::exists $tid] if {[::thread::exists $tid]} { - ns_log notice =========thottle-DESTROY-shutdown==========================THREAD-EXISTS + ns_log notice =========throttle-DESTROY-shutdown==========================THREAD-EXISTS set refcount [::thread::release $tid] - ns_log notice thottle-DESTROY-shutdownpending->[ns_info shutdownpending]-refCount$refcount + ns_log notice throttle-DESTROY-shutdownpending->[ns_info shutdownpending]-refCount$refcount } } next