Index: openacs-4/packages/dotlrn-homework/www/file-add.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-homework/www/file-add.tcl,v diff -u -N -r1.6.2.2 -r1.6.2.3 --- openacs-4/packages/dotlrn-homework/www/file-add.tcl 20 May 2016 20:26:15 -0000 1.6.2.2 +++ openacs-4/packages/dotlrn-homework/www/file-add.tcl 29 Jul 2016 13:23:38 -0000 1.6.2.3 @@ -62,12 +62,18 @@ db_transaction { - dotlrn_homework::new -file_id $file_id -new_file_p 1 -parent_folder_id $folder_id -title $name \ - -description $description -upload_file $upload_file -homework_file_id $homework_file_id -package_id [ad_conn package_id] + dotlrn_homework::new \ + -file_id $file_id \ + -new_file_p 1 \ + -parent_folder_id $folder_id \ + -title $name \ + -description $description \ + -upload_file $upload_file \ + -homework_file_id $homework_file_id \ + -package_id [ad_conn package_id] # Alert management. Semantics are hardwired to Sloan's spec. Eventually it would probably be nice # to make 'em configurable for non-admin users as they are now for admin users - if { $homework_file_id == 0 } { # We're uploading a new homework file, send alerts associated with our folder @@ -77,7 +83,6 @@ dotlrn_homework::request_correction_alert -homework_file_id $file_id } else { - # We're uploading a correction file, send alerts associated with the related homework file dotlrn_homework::send_correction_alerts -folder_id $folder_id -homework_file_id $homework_file_id