|
version 1.425, 2006/11/10 19:41:34
|
version 1.426, 2006/11/23 02:26:43
|
|
Line 1332 FULLPAGE
|
Line 1332 FULLPAGE
|
| my $cleanbut = ''; |
my $cleanbut = ''; |
| |
|
| my $titledisplay=&display_title(); |
my $titledisplay=&display_title(); |
| my %lt=&Apache::lonlocal::texthash('st' => 'Save this', |
my %lt=&Apache::lonlocal::texthash('st' => 'Save and Edit', |
| 'vi' => 'View', |
'vi' => 'Save and View', |
| 'ed' => 'Edit'); |
'ed' => 'Edit'); |
| my $buttons=(<<BUTTONS); |
my $buttons=(<<BUTTONS); |
| $cleanbut |
$cleanbut |
|
Line 1417 sub handler {
|
Line 1417 sub handler {
|
| # Edit action? Save file. |
# Edit action? Save file. |
| # |
# |
| unless ($env{'request.state'} eq 'published') { |
unless ($env{'request.state'} eq 'published') { |
| if ($env{'form.savethisfile'}) { |
if ($env{'form.savethisfile'} || $env{'form.viewmode'}) { |
| if (&storefile($file,$env{'form.filecont'})) { |
if (&storefile($file,$env{'form.filecont'})) { |
| &Apache::lonxml::info("<font COLOR=\"#0000FF\">". |
&Apache::lonxml::info("<font COLOR=\"#0000FF\">". |
| &mt('Updated').": ". |
&mt('Updated').": ". |
![[BACK]](/icons/back.gif){kind=icon}
Return to lonxml.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / xml