--- loncom/interface/spreadsheet/lonspreadsheet.pm 2005/05/17 17:48:19 1.41 +++ loncom/interface/spreadsheet/lonspreadsheet.pm 2009/04/22 17:19:14 1.53 @@ -1,5 +1,5 @@ # -# $Id: lonspreadsheet.pm,v 1.41 2005/05/17 17:48:19 albertel Exp $ +# $Id: lonspreadsheet.pm,v 1.53 2009/04/22 17:19:14 bisitz Exp $ # # Copyright Michigan State University Board of Trustees # @@ -73,12 +73,12 @@ use HTML::Entities(); sub textfield { my ($title,$name,$value)=@_; return "\n

$title:
". - ''; + ''; } sub hiddenfield { my ($name,$value)=@_; - return ''."\n"; + return ''."\n"; } sub selectbox { @@ -100,6 +100,7 @@ sub file_dialogs { my $message = ''; ## ## Deal with saving the spreadsheet + $spreadsheet->check_formulas_loaded(); if ((exists($env{'form.save'}) || exists($env{'form.makedefault'})) && exists($env{'form.savefilename'})) { $spreadsheet->filename($env{'form.savefilename'}); @@ -139,11 +140,11 @@ sub file_dialogs { if ($spreadsheet->is_default()) { $filename = 'Default'; } - my $save_dialog = ''. + my $save_dialog = ''. ' '. ''. - ''; + ''; my $makedefault_dialog = ''; # @@ -153,9 +154,9 @@ sub file_dialogs { my $load_dialog = < - + - $link + $link