--- loncom/interface/spreadsheet/lonspreadsheet.pm 2003/09/16 15:41:16 1.24
+++ loncom/interface/spreadsheet/lonspreadsheet.pm 2003/10/11 14:04:54 1.27
@@ -1,5 +1,5 @@
#
-# $Id: lonspreadsheet.pm,v 1.24 2003/09/16 15:41:16 matthew Exp $
+# $Id: lonspreadsheet.pm,v 1.27 2003/10/11 14:04:54 www Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -62,6 +62,8 @@ use Apache::assesscalc();
use Apache::Constants qw(:common :http);
use Apache::lonnet;
use Apache::lonhtmlcommon;
+use Apache::lonlocal;
+use Apache::loncoursedata();
use HTML::Entities();
##
@@ -85,7 +87,7 @@ sub selectbox {
foreach (sort keys(%options)) {
$selout.='';
+ $selout.='>'.&mt($options{$_}).'';
}
return $selout.'';
}
@@ -120,10 +122,10 @@ sub file_dialogs {
$result .=&hiddenfield('workcopy',$sheettype);
if ($ENV{'form.newformula'} !~ /^\s*$/) {
$message .='
'.
- 'Cell '.$ENV{'form.cell'}.' = | '.
+ ''.&mt('Cell').' '.$ENV{'form.cell'}.' = | '.
''.$ENV{'form.newformula'}." |
\n";
} else {
- $message .= 'Deleted contents of cell '.$ENV{'form.cell'}.'.';
+ $message .= &mt('Deleted contents of cell').' '.$ENV{'form.cell'}.'.';
}
}
##
@@ -138,18 +140,19 @@ sub file_dialogs {
$filename = 'Default';
}
my $save_dialog = ''.
- ' '.
+ ' '.
''.
'';
my $makedefault_dialog = '';
+ 'value="'.&mt('Save as & Make This Sheet the Default').'"/>';
#
my $link = 'Select Spreadsheet File";
+ "('sheet','loadfilename','spreadsheet')\">".&mt('Select Spreadsheet File')."";
+ my $load=&mt('Load:');
my $load_dialog = <
- |
+
|
$link
@@ -208,7 +211,7 @@ sub handler {
# HTML Header
#
if ($r->header_only) {
- $r->content_type('text/html');
+ &Apache::loncommon::content_type($r,'text/html');
$r->send_http_header;
return OK;
}
@@ -297,7 +300,7 @@ sub handler {
#
# Open page, try to prevent browser cache.
#
- $r->content_type('text/html');
+ &Apache::loncommon::content_type($r,'text/html');
&Apache::loncommon::no_cache($r);
$r->send_http_header;
@@ -310,6 +313,11 @@ sub handler {
## Spit out the javascript required for editing
##
if ($allowed_to_edit) {
+ my %lt=(
+ 'ce' => 'Cell',
+ 'ac' => 'Accept',
+ 'dc' => 'Discard Changes'
+ );
my $extra_javascript =
&Apache::loncommon::browser_and_searcher_javascript();
$r->print(<Cell Edit Window';
edit_text += ' |