Diff for /loncom/homework/daxepage.pm between versions 1.10 and 1.11

version 1.10, 2024/03/03 00:08:37 version 1.11, 2024/03/03 18:16:27
Line 75  sub handler { Line 75  sub handler {
                                           'oeds' => 'other editors',                                            'oeds' => 'other editors',
                                           'othe' => 'other editor',                                            'othe' => 'other editor',
                                           'edit' => 'Edit',                                            'edit' => 'Edit',
                                             'exit' => 'Exit Daxe',
                                         );                                          );
     my $name = $uri;      my $name = $uri;
     $name =~ s/^.*\/([^\/]+)$/$1/;      $name =~ s/^.*\/([^\/]+)$/$1/;
Line 83  sub handler { Line 84  sub handler {
     my $headjs = &Apache::loncommon::iframe_wrapper_headjs().      my $headjs = &Apache::loncommon::iframe_wrapper_headjs().
                  &toggle_LCmenus_js().                   &toggle_LCmenus_js().
                  &Apache::edit::js_change_detection();                   &Apache::edit::js_change_detection();
       my $clickexit; 
     if ($is_assess) {      if ($is_assess) {
         $headjs .= &Apache::lonxml::setmode_javascript();          $headjs .= &Apache::lonxml::setmode_javascript();
           $clickexit = "javascript:setmode(this.form,'view')";
     } else {      } else {
         $headjs .= &Apache::lonxml::seteditor_javascript();          $headjs .= &Apache::lonxml::seteditor_javascript();
           $clickexit = "javascript:seteditmode(this.form,'view')";
     }      }
     my $form_events = &Apache::edit::form_change_detection();      my $form_events = &Apache::edit::form_change_detection();
     my $editheader = '<form '.$form_events.' method="post" name="daxeedit" action="'.$uri.'">'.      my $editheader = '<form '.$form_events.' method="post" name="daxeedit" action="'.$uri.'">'.
                      '<input type="hidden" name="problemmode" value="daxe" />'."\n".                       '<input type="hidden" name="problemmode" value="daxe" />'."\n".
                      '<div class="LC_edit_problem_editxml_header">'."\n";                       '<div class="LC_edit_problem_editxml_header">'."\n";
       my $exitbutton = '<input type="button" name="submitmode" accesskey="t" value="'.$lt{'exit'}.
                        '" onclick="'.$clickexit.'" />'."\n";
     if ($editors{'edit'} || $editors{'xml'}) {      if ($editors{'edit'} || $editors{'xml'}) {
         my $other = (($editors{'edit'} && $editors{'xml'})? $lt{'oeds'} : $lt{'othe'});          my $other = (($editors{'edit'} && $editors{'xml'})? $lt{'oeds'} : $lt{'othe'});
         $editheader .= '<table class="LC_edit_problem_header_title"><tr><td>'.          $editheader .= '<table class="LC_edit_problem_header_title"><tr><td>'.
Line 111  sub handler { Line 117  sub handler {
                                'onclick="javascript:setmode(this.form,'."'editxml'".')" />'."\n";                                 'onclick="javascript:setmode(this.form,'."'editxml'".')" />'."\n";
             }              }
         }          }
         $editheader .= '</span></td></tr></table>';          $editheader .= '&nbsp;&nbsp;|&nbsp;&nbsp;'.$exitbutton.'</span></td></tr></table>';
     } else {      } else {
         $editheader .= '<table class="LC_edit_problem_header_title"><tr><td>'.          $editheader .= '<table class="LC_edit_problem_header_title"><tr><td>'.
                        $uri.                         $uri.
                        '</td></tr></table>';                         '</td><td align="right"><span class="LC_nobreak">'.
                          $exitbutton.'</span></td></tr></table>';
     }      }
     $editheader .= '</div></form>'."\n";      $editheader .= '</div></form>'."\n";
     my $start_collapsed = &collapsible_std_LCmenus();      my $start_collapsed = &collapsible_std_LCmenus();

Removed from v.1.10  
changed lines
  Added in v.1.11


FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>