![[BACK]](/icons/back.gif){kind=icon}
Return to structuretags.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / homework|
Return to structuretags.pm CVS log | Up to [LON-CAPA] / loncom / homework |
| version 1.337, 2006/03/02 21:20:30 | version 1.338, 2006/03/02 22:04:04 |
|---|---|
| Line 36 use Apache::File(); | Line 36 use Apache::File(); |
| use Apache::lonmenu; | use Apache::lonmenu; |
| use Apache::lonlocal; | use Apache::lonlocal; |
| use Apache::lonxml; | use Apache::lonxml; |
| use Apache::lonenc(); | |
| use Time::HiRes qw( gettimeofday tv_interval ); | use Time::HiRes qw( gettimeofday tv_interval ); |
| BEGIN { | BEGIN { |
| &Apache::lonxml::register('Apache::structuretags',('block','languageblock','instructorcomment','while','randomlist','problem','library','web','tex','part','preduedate','postanswerdate','solved','notsolved','problemtype','startouttext','endouttext','simpleeditbutton','definetag')); | &Apache::lonxml::register('Apache::structuretags',('block','languageblock','instructorcomment','while','randomlist','problem','library','web','tex','part','preduedate','postanswerdate','solved','notsolved','problemtype','startouttext','endouttext','simpleeditbutton','definetag')); |
| Line 157 sub page_start { | Line 158 sub page_start { |
| my $form_tag_start; | my $form_tag_start; |
| if (!defined($found{'form'})) { | if (!defined($found{'form'})) { |
| $form_tag_start='<form name="lonhomework" enctype="multipart/form-data" method="post" action="'; | $form_tag_start='<form name="lonhomework" enctype="multipart/form-data" method="post" action="'; |
| my $uri = &Apache::lonenc::check_encrypted($env{'request.uri'}); | my $uri = &Apache::lonenc::check_encrypt($env{'request.uri'}); |
| $form_tag_start.=$uri.'" '; | $form_tag_start.=$uri.'" '; |
| if ($target eq 'edit') { | if ($target eq 'edit') { |
| $form_tag_start.=&Apache::edit::form_change_detection(); | $form_tag_start.=&Apache::edit::form_change_detection(); |