Index: openacs-4/packages/dotlrn-homework/tcl/dotlrn-homework-applet-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-homework/tcl/dotlrn-homework-applet-procs.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/packages/dotlrn-homework/tcl/dotlrn-homework-applet-procs.tcl 17 Feb 2003 20:56:15 -0000 1.1 +++ openacs-4/packages/dotlrn-homework/tcl/dotlrn-homework-applet-procs.tcl 30 Oct 2003 12:21:43 -0000 1.2 @@ -46,7 +46,7 @@ } { returns the pretty name } { - return "Homework" + return "[_ dotlrn-homework.pretty_name]" } ad_proc -public add_applet { @@ -82,7 +82,7 @@ set community_name [dotlrn_community::get_community_name $community_id] set folder_id [fs::get_root_folder -package_id $package_id] - fs::rename_folder -folder_id $folder_id -name "${community_name}'s Homework Folder" + fs::rename_folder -folder_id $folder_id -name "[_ dotlrn-homework.lt_homework_folder]" set node_id [site_node::get_node_id_from_object_id -object_id $package_id] site_node_object_map::new -object_id $folder_id -node_id $node_id @@ -259,7 +259,7 @@ switch $event { rename { fs::rename_folder -folder_id [fs::get_root_folder -package_id [get_package_id]] \ - -name "${new_value}'s Homework Folder" + -name "[_ dotlrn-homework.lt_new_values]" } } } Index: openacs-4/packages/dotlrn-homework/tcl/dotlrn-homework-portlet-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-homework/tcl/dotlrn-homework-portlet-procs.tcl,v diff -u -r1.2 -r1.3 --- openacs-4/packages/dotlrn-homework/tcl/dotlrn-homework-portlet-procs.tcl 29 Jun 2003 23:30:49 -0000 1.2 +++ openacs-4/packages/dotlrn-homework/tcl/dotlrn-homework-portlet-procs.tcl 30 Oct 2003 12:21:44 -0000 1.3 @@ -33,7 +33,7 @@ ad_proc -public get_pretty_name { } { - return "Homework" + return "#dotlrn-homework.pretty_name#" } ad_proc -public link { @@ -110,7 +110,7 @@ ad_proc -public get_pretty_name { } { - return "Homework Administration" + return "[_ dotlrn-homework.homework_pretty_admin]" } ad_proc -public link { Index: openacs-4/packages/dotlrn-homework/tcl/dotlrn-homework-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-homework/tcl/dotlrn-homework-procs.tcl,v diff -u -r1.2 -r1.3 --- openacs-4/packages/dotlrn-homework/tcl/dotlrn-homework-procs.tcl 20 Feb 2003 02:29:40 -0000 1.2 +++ openacs-4/packages/dotlrn-homework/tcl/dotlrn-homework-procs.tcl 30 Oct 2003 12:21:44 -0000 1.3 @@ -105,7 +105,7 @@ set title [encode_name -user_id $homework_user_id $title] if { [db_0or1row check_duplicate {}]} { - return -code error "A file named \"$title\" already exists in this folder" + return -code error "[_ dotlrn-homework.lt_file_named]" } db_exec_plsql new_lob_file {} @@ -219,16 +219,19 @@ db_1row get_alert_info {} + set decoded_name [decode_name $name] + set message " -A file named \"[decode_name $name]\" has been uploaded to the folder \"$folder_name\" by -\"$student_name\". +[_ dotlrn-homework.lt_a_file_named_1] " + notification::new -type_id [notification::type::get_type_id -short_name homework_upload] \ - -object_id $folder_id -response_id $folder_id -notif_subject "Homework upload alert" \ + -object_id $folder_id -response_id $folder_id -notif_subject "[_ dotlrn-homework.lt_homework_upload]" \ -notif_text $message + } ad_proc -public send_correction_alerts { @@ -244,16 +247,18 @@ db_1row get_alert_info {} + set decoded_name [decode_name $name] + set message " -$admin_name has uploaded comments to your homework file named \"[decode_name $name]\" in the -homework folder \"$folder_name\". +[_ dotlrn-homework.lt_admin_has_uploaded]" -" + notification::new -type_id [notification::type::get_type_id -short_name correction_upload] \ - -object_id $homework_file_id -response_id $homework_file_id -notif_subject "Correction file alert" \ + -object_id $homework_file_id -response_id $homework_file_id -notif_subject "[_ dotlrn-homework.lt_correction_file_alert]" \ -notif_text $message + } ad_proc -public request_correction_alert { Index: openacs-4/packages/dotlrn-homework/www/dotlrn-homework-admin-portlet.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-homework/www/dotlrn-homework-admin-portlet.adp,v diff -u -r1.4 -r1.5 --- openacs-4/packages/dotlrn-homework/www/dotlrn-homework-admin-portlet.adp 24 Sep 2003 15:28:12 -0000 1.4 +++ openacs-4/packages/dotlrn-homework/www/dotlrn-homework-admin-portlet.adp 30 Oct 2003 12:21:44 -0000 1.5 @@ -5,11 +5,12 @@ + Index: openacs-4/packages/dotlrn-homework/www/file-add.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-homework/www/file-add.adp,v diff -u -r1.1 -r1.2 --- openacs-4/packages/dotlrn-homework/www/file-add.adp 17 Feb 2003 20:56:16 -0000 1.1 +++ openacs-4/packages/dotlrn-homework/www/file-add.adp 30 Oct 2003 12:21:44 -0000 1.2 @@ -1,5 +1,6 @@ -Submit New Assignment File +#dotlrn-homework.lt_Submit_New_Assignment# @context_bar@ + 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 -r1.1 -r1.2 --- openacs-4/packages/dotlrn-homework/www/file-add.tcl 17 Feb 2003 20:56:16 -0000 1.1 +++ openacs-4/packages/dotlrn-homework/www/file-add.tcl 30 Oct 2003 12:21:44 -0000 1.2 @@ -12,7 +12,7 @@ } -validate { valid_folder -requires {folder_id:integer} { if ![fs_folder_p $folder_id] { - ad_complain "The specified parent folder is not valid." + ad_complain "[_ dotlrn-homework.lt_spec_parent]" } } } -properties { @@ -27,22 +27,22 @@ # to an existing homework file, or a new home work file if { $homework_file_id == 0 } { - set page_title "Submit New Assignment File" - set context_bar {"Upload New Assignment"} + set page_title "[_ dotlrn-homework.lt_submit_new_file]" + set context_bar {"[_ dotlrn-homework.lt_upload_new_as]"} } else { - set page_title "Submit Comments" - set context_bar {"Upload Comments"} + set page_title "[_ dotlrn-homework.lt_submit_comm]" + set context_bar {"[_ dotlrn-homework.lt_upload_comm]"} } ad_form -name homework_form -html { enctype multipart/form-data } -export { return_url folder_id homework_file_id } -form { file_id:key - {upload_file:file {label "Version filename"}} - {-section "Use the \"Browse...\" button to locate your file, then click \"Open\"

 "} + {upload_file:file {label "[_ dotlrn-homework.lt_version_filename]"}} + {-section "[_ dotlrn-homework.lt_use_browse]

 "} } if { $homework_file_id == 0 } { ad_form -extend -name homework_form -form { - {name:text {label "Title"} + {name:text {label "[_ dotlrn-homework.Title]"} {html {size 30}}} } } else { @@ -51,12 +51,12 @@ ad_form -extend -name homework_form -form { - {description:text(textarea),optional {label "Description"} + {description:text(textarea),optional {label "[_ dotlrn-homework.Description]"} {html {rows 5 cols 50 wrap physical}}} } -validate { {upload_file { [file size [template::util::file::get_property tmp_filename $upload_file]] <= [ad_parameter "MaximumFileSize"] } - "Your file is larger than the maximum file size allowed on this system ([util_commify_number [ad_parameter MaximumFileSize]] bytes)" + "[_ dotlrn-homework.lt_your_file_is] ([util_commify_number [ad_parameter MaximumFileSize]] [_ dotlrn-homework.bytes])" } } -new_data { Index: openacs-4/packages/dotlrn-homework/www/file-copy-2.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-homework/www/file-copy-2.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/packages/dotlrn-homework/www/file-copy-2.tcl 17 Feb 2003 20:56:16 -0000 1.1 +++ openacs-4/packages/dotlrn-homework/www/file-copy-2.tcl 30 Oct 2003 12:21:44 -0000 1.2 @@ -10,13 +10,13 @@ } -validate { valid_file -requires {file_id} { if ![fs_file_p $file_id] { - ad_complain "The specified file is not valid." + ad_complain "[_ dotlrn-homework.lt_specified_file]" } } valid_folder -requires {parent_id} { if ![fs_folder_p $parent_id] { - ad_complain "The specified parent folder is not valid." + ad_complain "[_ dotlrn-homework.lt_spec_parent]" } } } @@ -75,7 +75,7 @@ } } on_error { - ad_return_complaint 1 "The folder you selected already contains a file with the same name. " + ad_return_complaint 1 "[_ dotlrn-homework.lt_folder_already_contains] " return } Index: openacs-4/packages/dotlrn-homework/www/file-copy.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-homework/www/file-copy.adp,v diff -u -r1.1 -r1.2 --- openacs-4/packages/dotlrn-homework/www/file-copy.adp 17 Feb 2003 20:56:16 -0000 1.1 +++ openacs-4/packages/dotlrn-homework/www/file-copy.adp 30 Oct 2003 12:21:44 -0000 1.2 @@ -1,13 +1,14 @@ -Copy +#dotlrn-homework.Copy# @context_bar@ -

Select the folder that you would like to copy "@file_name@" to +

#dotlrn-homework.lt_Select_the_folder_tha#

- +

+ Index: openacs-4/packages/dotlrn-homework/www/file-copy.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-homework/www/file-copy.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/packages/dotlrn-homework/www/file-copy.tcl 17 Feb 2003 20:56:16 -0000 1.1 +++ openacs-4/packages/dotlrn-homework/www/file-copy.tcl 30 Oct 2003 12:21:44 -0000 1.2 @@ -9,7 +9,7 @@ } -validate { valid_file -requires {file_id} { if ![fs_file_p $file_id] { - ad_complain "The specified file is not valid." + ad_complain "[_ dotlrn-homework.lt_specified_file]" } } } -properties { @@ -26,6 +26,6 @@ set file_name [dotlrn_homework::decode_name [db_string file_name {}]] -set context_bar {"Copy"} +set context_bar {"[_ dotlrn-homework.Copy]"} ad_return_template Index: openacs-4/packages/dotlrn-homework/www/file-delete.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-homework/www/file-delete.adp,v diff -u -r1.1 -r1.2 --- openacs-4/packages/dotlrn-homework/www/file-delete.adp 17 Feb 2003 20:56:18 -0000 1.1 +++ openacs-4/packages/dotlrn-homework/www/file-delete.adp 30 Oct 2003 12:21:44 -0000 1.2 @@ -1,11 +1,10 @@ -Delete @title@ +#dotlrn-homework.Delete_title# @context_bar@ -

This file has versions that you do not have permission to delete, -so you cannot delete the file. +

#dotlrn-homework.lt_This_file_has_version# @@ -14,13 +13,13 @@ -

Are you sure you want to delete the file "@title@" and all of -its versions? This action cannot be reversed. +

#dotlrn-homework.lt_Are_you_sure_you_want#

- +
+ Index: openacs-4/packages/dotlrn-homework/www/file-delete.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-homework/www/file-delete.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/packages/dotlrn-homework/www/file-delete.tcl 17 Feb 2003 20:56:18 -0000 1.1 +++ openacs-4/packages/dotlrn-homework/www/file-delete.tcl 30 Oct 2003 12:21:44 -0000 1.2 @@ -10,7 +10,7 @@ } -validate { valid_file -requires {file_id} { if ![fs_file_p $file_id] { - ad_complain "The specified file is not valid." + ad_complain "[_ dotlrn-homework.lt_specified_file]" } } } -properties { @@ -68,7 +68,7 @@ set title [dotlrn_homework::decode_name $title] - set context_bar {"Delete"} + set context_bar {"[_ dotlrn-homework.Delete]"} ad_return_template } Index: openacs-4/packages/dotlrn-homework/www/file-move-2.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-homework/www/file-move-2.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/packages/dotlrn-homework/www/file-move-2.tcl 17 Feb 2003 20:56:16 -0000 1.1 +++ openacs-4/packages/dotlrn-homework/www/file-move-2.tcl 30 Oct 2003 12:21:44 -0000 1.2 @@ -10,13 +10,13 @@ } -validate { valid_file -requires {file_id} { if ![fs_file_p $file_id] { - ad_complain "The specified file is not valid." + ad_complain "[_ dotlrn-homework.lt_specified_file]" } } valid_folder -requires {parent_id} { if ![fs_folder_p $parent_id] { - ad_complain "The specified parent folder is not valid." + ad_complain "[_ dotlrn-homework.lt_spec_parent]" } } } Index: openacs-4/packages/dotlrn-homework/www/file-move.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-homework/www/file-move.adp,v diff -u -r1.1 -r1.2 --- openacs-4/packages/dotlrn-homework/www/file-move.adp 17 Feb 2003 20:56:17 -0000 1.1 +++ openacs-4/packages/dotlrn-homework/www/file-move.adp 30 Oct 2003 12:21:44 -0000 1.2 @@ -1,13 +1,14 @@ -Move +#dotlrn-homework.Move# @context_bar@ -

Select the folder that you would like to move "@name@" under +

#dotlrn-homework.lt_Select_the_folder_tha_1#

- +

+ Index: openacs-4/packages/dotlrn-homework/www/file-move.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-homework/www/file-move.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/packages/dotlrn-homework/www/file-move.tcl 17 Feb 2003 20:56:17 -0000 1.1 +++ openacs-4/packages/dotlrn-homework/www/file-move.tcl 30 Oct 2003 12:21:44 -0000 1.2 @@ -11,7 +11,7 @@ } -validate { valid_file -requires {file_id} { if ![fs_file_p $file_id] { - ad_complain "The specified file is not valid." + ad_complain "[_ dotlrn-homework.lt_specified_file]" } } } -properties { @@ -24,7 +24,7 @@ # right permission?) ad_require_permission $file_id write -set context_bar "Move" +set context_bar "[_ dotlrn-homework.Move]" set return_url "[ad_conn url]?[ad_conn query]" ad_return_template Index: openacs-4/packages/dotlrn-homework/www/file.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-homework/www/file.adp,v diff -u -r1.1 -r1.2 --- openacs-4/packages/dotlrn-homework/www/file.adp 17 Feb 2003 20:56:17 -0000 1.1 +++ openacs-4/packages/dotlrn-homework/www/file.adp 30 Oct 2003 12:21:44 -0000 1.2 @@ -4,39 +4,39 @@

[ - Show only live version + #dotlrn-homework.lt_Show_only_live_versio# - Show all versions + #dotlrn-homework.Show_all_versions# - | Upload a new version + | #dotlrn-homework.Upload_a_new_version# - | Move + | #dotlrn-homework.Move# - | Delete this file (including all versions) + | #dotlrn-homework.lt_Delete_this_file_incl# ]

- - - - - - + + + + + + @@ -54,10 +54,11 @@
- All Versions of "@name@" - Live version of "@name@" + #dotlrn-homework.All_Versions_of_name# + #dotlrn-homework.Live_version_of_name#
Version filenameAuthorSize (bytes)TypeModifiedVersion Notes#dotlrn-homework.Version_filename##dotlrn-homework.Author##dotlrn-homework.Size_bytes##dotlrn-homework.Type##dotlrn-homework.Modified##dotlrn-homework.Version_Notes# - Action + #dotlrn-homework.Action#
  - delete + #dotlrn-homework.delete#
+ Index: openacs-4/packages/dotlrn-homework/www/file.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-homework/www/file.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/packages/dotlrn-homework/www/file.tcl 17 Feb 2003 20:56:17 -0000 1.1 +++ openacs-4/packages/dotlrn-homework/www/file.tcl 30 Oct 2003 12:21:44 -0000 1.2 @@ -16,7 +16,7 @@ } -validate { valid_file -requires {file_id} { if ![fs_file_p $file_id] { - ad_complain "The specified file is not valid." + ad_complain "[_ dotlrn-homework.lt_specified_file]" } } } -properties { @@ -40,7 +40,7 @@ #set templating datasources set user_id [ad_conn user_id] -set context_bar {"One Assignment"} +set context_bar {"[_ dotlrn-homework.lt_one_assignment]"} set return_url "[ad_conn url]?[ad_conn query]" db_1row file_info {} Index: openacs-4/packages/dotlrn-homework/www/folder-chunk.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-homework/www/folder-chunk.adp,v diff -u -r1.2 -r1.3 --- openacs-4/packages/dotlrn-homework/www/folder-chunk.adp 29 Jun 2003 23:30:49 -0000 1.2 +++ openacs-4/packages/dotlrn-homework/www/folder-chunk.adp 30 Oct 2003 12:21:44 -0000 1.3 @@ -13,7 +13,7 @@ - Folder is empty + #dotlrn-homework.Folder_is_empty# @@ -23,28 +23,23 @@ # it. %> -

There are two ways to comment on students' files: 1) upload a separate/new file or - 2) make comments directly in the student's file. For #1, upload your file from this page. - For #2, first download/open and save the file to your computer. When finished, save the - file and then return to the Homework folder and upload your comments. -

TAs and professors can upload different versions of comments from the Details page - and can use the Version notes text box to differentiate between comments files. -

For more information, read the Admin FAQ on the class Control Panel page or refer - to the Handbook. +

#dotlrn-homework.lt_There_are_two_ways_to# +

#dotlrn-homework.lt_TAs_and_professors_ca# +

#dotlrn-homework.lt_For_more_information_#

- + - + - + @@ -59,24 +54,25 @@ - +
 Title#dotlrn-homework.Title# Student#dotlrn-homework.Student# Action#dotlrn-homework.Action#
@folders.name@ @folders.spaces@@folders.spaces;noquote@ @folders.pretty_name@ @folders.file_owner_name@ - Details + #dotlrn-homework.New_Comments# - | New Comments + | #dotlrn-homework.View# - | View/Edit Comments + | #dotlrn-homework.View_1##dotlrn-homework.lt_or_edit# #dotlrn-homework.Comments#
+ Index: openacs-4/packages/dotlrn-homework/www/folder-chunk.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-homework/www/folder-chunk.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/packages/dotlrn-homework/www/folder-chunk.tcl 17 Feb 2003 20:56:17 -0000 1.1 +++ openacs-4/packages/dotlrn-homework/www/folder-chunk.tcl 30 Oct 2003 12:21:44 -0000 1.2 @@ -34,16 +34,16 @@ if { [llength $list_of_folder_ids] == 1 } { set folder_id [lindex $list_of_folder_ids 0] if { $show_upload_url_p } { - template::multirow append toolbar "Submit a new Assignment" \ + template::multirow append toolbar "[_ dotlrn-homework.lt_submit_new_assign]" \ "${url}file-add?[export_vars {folder_id return_url}]" } if { $admin_actions_p } { - template::multirow append toolbar "Create new folder" \ + template::multirow append toolbar "[_ dotlrn-homework.lt_create_new_folder]" \ "${url}folder-create?[export_vars {{parent_id $folder_id} return_url}]" # Even a community admin can't delete the root homework folder if { ![string equal $folder_id [fs::get_root_folder -package_id [ad_conn package_id]]] } { - template::multirow append toolbar "Delete folder" \ + template::multirow append toolbar "[_ dotlrn-homework.lt_delete_folder]" \ "${url}folder-delete?[export_vars {folder_id}]" } } @@ -90,7 +90,7 @@ set view_correction_details_url "${url}file?[export_vars {folder_id {file_id $homework_file_id} {show_all_versions_p "t"}}]" } elseif { $admin_p } { set upload_correction_url \ - "${url}file-add?[export_vars {folder_id return_url {name "$pretty_name - Comments"} {homework_file_id $object_id}}]" + "${url}file-add?[export_vars {folder_id return_url {name "$pretty_name - [_ dotlrn-homework.Comments]"} {homework_file_id $object_id}}]" } } } Index: openacs-4/packages/dotlrn-homework/www/folder-contents.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-homework/www/folder-contents.adp,v diff -u -r1.2 -r1.3 --- openacs-4/packages/dotlrn-homework/www/folder-contents.adp 29 Jun 2003 23:30:49 -0000 1.2 +++ openacs-4/packages/dotlrn-homework/www/folder-contents.adp 30 Oct 2003 12:21:44 -0000 1.3 @@ -1,9 +1,10 @@ - Contents of @folder_name@ + #dotlrn-homework.lt_Contents_of_folder_na# @context_bar;noquote@
+ Index: openacs-4/packages/dotlrn-homework/www/folder-contents.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-homework/www/folder-contents.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/packages/dotlrn-homework/www/folder-contents.tcl 17 Feb 2003 20:56:17 -0000 1.1 +++ openacs-4/packages/dotlrn-homework/www/folder-contents.tcl 30 Oct 2003 12:21:44 -0000 1.2 @@ -11,7 +11,7 @@ } -validate { valid_folder -requires {folder_id:integer} { if ![fs_folder_p $folder_id] { - ad_complain "The specified parent folder is not valid." + ad_complain "[_ dotlrn-homework.lt_spec_parent]" } } } -properties { @@ -34,7 +34,7 @@ set list_of_folder_ids [list $folder_id] set package_id [ad_conn package_id] set folder_name [fs_get_folder_name $folder_id] -set context_bar {"One Folder"} +set context_bar {"[_ dotlrn-homework.lt_one_folder]"} set community_id [dotlrn_community::get_community_id] set admin_p [permission::permission_p -object_id $folder_id -privilege "admin"] Index: openacs-4/packages/dotlrn-homework/www/folder-create.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-homework/www/folder-create.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/packages/dotlrn-homework/www/folder-create.tcl 17 Feb 2003 20:56:17 -0000 1.1 +++ openacs-4/packages/dotlrn-homework/www/folder-create.tcl 30 Oct 2003 12:21:44 -0000 1.2 @@ -11,7 +11,7 @@ } -validate { valid_folder -requires {parent_id:integer} { if ![fs_folder_p $parent_id] { - ad_complain "The specified parent folder is not valid." + ad_complain "[_ dotlrn-homework.lt_spec_parent]" } } } -properties { @@ -20,8 +20,8 @@ page_title:onevalue } -set context_bar {"Create Folder"} -set page_title "Create Subfolder" +set context_bar {"[_ dotlrn-homework.lt_create_folder]"} +set page_title "[_ dotlrn-homework.lt_create_subfolder]" set user_id [ad_conn user_id] set creation_ip [ad_conn peeraddr] @@ -38,7 +38,7 @@ ad_form -name homework_form -form { {return_url:text(hidden) {value $return_url}} {parent_id:text(hidden) {value $parent_id}} - {folder_name:text {label "Folder Name"} + {folder_name:text {label "[_ dotlrn-homework.lt_folder_name]"} {html {size 20}}} } -on_submit { Index: openacs-4/packages/dotlrn-homework/www/folder-delete.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-homework/www/folder-delete.adp,v diff -u -r1.1 -r1.2 --- openacs-4/packages/dotlrn-homework/www/folder-delete.adp 17 Feb 2003 20:56:17 -0000 1.1 +++ openacs-4/packages/dotlrn-homework/www/folder-delete.adp 30 Oct 2003 12:21:44 -0000 1.2 @@ -1,16 +1,17 @@ -Delete @folder_name@ +#dotlrn-homework.Delete_folder_name# @context_bar@

-

Are you sure you want to delete the folder "@folder_name@"? This action cannot be reversed. +

#dotlrn-homework.lt_Are_you_sure_you_want_1#

- +
+ Index: openacs-4/packages/dotlrn-homework/www/folder-delete.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-homework/www/folder-delete.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/packages/dotlrn-homework/www/folder-delete.tcl 17 Feb 2003 20:56:17 -0000 1.1 +++ openacs-4/packages/dotlrn-homework/www/folder-delete.tcl 30 Oct 2003 12:21:44 -0000 1.2 @@ -12,13 +12,13 @@ } -validate { valid_folder -requires {folder_id:integer} { if ![fs_folder_p $folder_id] { - ad_complain "The specified folder is not valid." + ad_complain "[_ dotlrn-homework.lt_spec_folder]" } } no_children -requires {not_root_folder} { if { [db_string child_count {}] > 0 } { - ad_complain "We're sorry, but at the moment you cannot delete folders unless they are already empty." + ad_complain "[_ dotlrn-homework.lt_were_sorry]" } } } -properties { @@ -39,6 +39,6 @@ } else { # they still need to confirm set folder_name [db_string folder_name {}] - set context_bar {"Delete"} + set context_bar {"[_ dotlrn-homework.Delete]"} ad_return_template } Index: openacs-4/packages/dotlrn-homework/www/master.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-homework/www/master.adp,v diff -u -r1.2 -r1.3 --- openacs-4/packages/dotlrn-homework/www/master.adp 29 Jun 2003 23:30:49 -0000 1.2 +++ openacs-4/packages/dotlrn-homework/www/master.adp 30 Oct 2003 12:21:44 -0000 1.3 @@ -8,3 +8,4 @@
+ Index: openacs-4/packages/dotlrn-homework/www/toggle-homework-alert.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-homework/www/toggle-homework-alert.tcl,v diff -u -r1.2 -r1.3 --- openacs-4/packages/dotlrn-homework/www/toggle-homework-alert.tcl 29 Jun 2003 23:30:49 -0000 1.2 +++ openacs-4/packages/dotlrn-homework/www/toggle-homework-alert.tcl 30 Oct 2003 12:21:44 -0000 1.3 @@ -17,7 +17,7 @@ } -validate { valid_folder -requires {folder_id:integer} { if ![fs_folder_p $folder_id] { - ad_complain "The specified parent folder is not valid." + ad_complain "[_ dotlrn-homework.lt_spec_parent]" } } } @@ -33,7 +33,7 @@ # Sanity check to make sure the db entries are set up correctly. if { [llength $intervals] != 1 || [llength $delivery_methods] != 1 } { - ad_return_error "Internal Error" "Interval or delivery method for homework notifications broken" + ad_return_error "[_ dotlrn-homework.lt_internal_error]" "[_ dotlrn-homework.lt_interval_or_del]" } # The get routines return a list of name/id pairs so extract the ids Index: openacs-4/packages/dotlrn-homework/www/version-add.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-homework/www/version-add.adp,v diff -u -r1.1 -r1.2 --- openacs-4/packages/dotlrn-homework/www/version-add.adp 17 Feb 2003 20:56:17 -0000 1.1 +++ openacs-4/packages/dotlrn-homework/www/version-add.adp 30 Oct 2003 12:21:44 -0000 1.2 @@ -1,5 +1,6 @@ -Upload New Version of @name@ +#dotlrn-homework.lt_Upload_New_Version_of# @context_bar@ + Index: openacs-4/packages/dotlrn-homework/www/version-add.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-homework/www/version-add.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/packages/dotlrn-homework/www/version-add.tcl 17 Feb 2003 20:56:18 -0000 1.1 +++ openacs-4/packages/dotlrn-homework/www/version-add.tcl 30 Oct 2003 12:21:44 -0000 1.2 @@ -12,7 +12,7 @@ } -validate { valid_folder -requires {folder_id:integer} { if ![fs_folder_p $folder_id] { - ad_complain "The specified parent folder is not valid." + ad_complain "[_ dotlrn-homework.lt_spec_parent]" } } } -properties { @@ -24,20 +24,20 @@ # check for write permission on the file ad_require_permission $file_id write -set page_title "Upload New Version of $name" -set context_bar {"Upload New Assignment Version"} +set page_title "[_ dotlrn-homework.lt_upload_new_version_of]" +set context_bar {"[_ dotlrn-homework.lt_upload_new_ass_version]"} ad_form -name homework_form -html { enctype multipart/form-data } -export { return_url name folder_id } -form { file_id:key - {upload_file:file {label "Version filename"}} - {-section "Use the \"Browse...\" button to locate your file, then click \"Open\"

 "} - {description:text(textarea),optional {label "Version notes"} + {upload_file:file {label "[_ dotlrn-homework.lt_version_filename]"}} + {-section "[_ dotlrn-homework.lt_use_browse]

 "} + {description:text(textarea),optional {label "[_ dotlrn-homework.lt_version_notes]"} {html {rows 5 cols 50 wrap physical}}} } -edit_request { } -validate { {upload_file { [file size [template::util::file::get_property tmp_filename $upload_file]] <= [ad_parameter "MaximumFileSize"] } - "Your file is larger than the maximum file size allowed on this system ([util_commify_number [ad_parameter MaximumFileSize]] bytes)" + "[_ dotlrn-homework.lt_your_file_is] ([util_commify_number [ad_parameter MaximumFileSize]] [_ dotlrn-homework.bytes])" } } -edit_data { Index: openacs-4/packages/dotlrn-homework/www/version-delete.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-homework/www/version-delete.adp,v diff -u -r1.1 -r1.2 --- openacs-4/packages/dotlrn-homework/www/version-delete.adp 17 Feb 2003 20:56:18 -0000 1.1 +++ openacs-4/packages/dotlrn-homework/www/version-delete.adp 30 Oct 2003 12:21:44 -0000 1.2 @@ -1,19 +1,19 @@ -Delete @version_name@ +#dotlrn-homework.Delete_version_name# @context_bar@

-

Are you sure that you want to delete this version "@version_name@" of "@title@"? -This action cannot be reversed. +

#dotlrn-homework.lt_Are_you_sure_that_you#

- +
+ Index: openacs-4/packages/dotlrn-homework/www/version-delete.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-homework/www/version-delete.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/packages/dotlrn-homework/www/version-delete.tcl 17 Feb 2003 20:56:18 -0000 1.1 +++ openacs-4/packages/dotlrn-homework/www/version-delete.tcl 30 Oct 2003 12:21:44 -0000 1.2 @@ -10,7 +10,7 @@ } -validate { valid_version -requires {version_id} { if ![fs_version_p $version_id] { - ad_complain "The specified version is not valid." + ad_complain "[_ dotlrn-homework.lt_spec_version]" } } } -properties { @@ -78,6 +78,6 @@ set title [dotlrn_homework::decode_name $title] - set context_bar {"Delete Version"} + set context_bar {"[_ dotlrn-homework.lt_delete_version]"} ad_return_template }