[BACK]Return to lonhtmlcommon.pm CVS log [TXT] [DIR] Up to [LON-CAPA] / loncom / interface

Diff for /loncom/interface/lonhtmlcommon.pm between versions 1.72 and 1.75

version 1.72, 2004/06/03 14:28:39 version 1.75, 2004/06/05 14:46:12
Line 875  sub htmlareaheaders { Line 875  sub htmlareaheaders {
     }      }
     return (<<ENDHEADERS);      return (<<ENDHEADERS);
 <script type="text/javascript">  <script type="text/javascript">
     _editor_url="/htmlarea/";  
 </script>  
 <script type="text/javascript" src="/htmlarea/htmlarea.js"></script>  
 <style type="text/javascript">  
 _editor_url='/htmlarea/';  _editor_url='/htmlarea/';
 _editor_lang='$lang';  _editor_lang='$lang';
 </style>  </script>
   <script type="text/javascript" src="/htmlarea/htmlarea.js"></script>
 ENDHEADERS  ENDHEADERS
 }  }
   
   # ------------------------------------------------- Activate additional buttons
   
   sub htmlareaaddbuttons {
       if (&htmlareablocked()) { return ''; }
       return (<<ENDADDBUTTON);
       var config=new HTMLArea.Config();
       config.registerButton('ed_math','LaTeX Inline',
     '/htmlarea/images/ed_math.gif',false,
       function(editor,id) {
         editor.surroundHTML('<m>\$','\$</m>');
       }
     );
       config.registerButton('ed_math_eqn','LaTeX Equation',
     '/htmlarea/images/ed_math_eqn.gif',false,
       function(editor,id) {
         editor.surroundHTML(
        '<center><m>\\\\[','\\\\]</m></center>');
       }
     );
       config.toolbar.push(['ed_math','ed_math_eqn']);
   ENDADDBUTTON
   }
 # ---------------------------------------------------------- Script to activate  # ---------------------------------------------------------- Script to activate
   
 sub htmlareaactive {  sub htmlareaactive {
     if (&htmlareablocked()) { return ''; }      if (&htmlareablocked()) { return ''; }
       my $addbuttons=&htmlareaaddbuttons();
     return (<<ENDSCRIPT);      return (<<ENDSCRIPT);
 <script type="text/javascript" defer="1">  <script type="text/javascript" defer="1">
     HTMLArea.replaceAll();      $addbuttons
       HTMLArea.replaceAll(config);
 </script>  </script>
 ENDSCRIPT  ENDSCRIPT
 }  }
Line 899  ENDSCRIPT Line 920  ENDSCRIPT
 # ----------------------------------------- Script to activate only some fields  # ----------------------------------------- Script to activate only some fields
   
 sub htmlareaselectactive {  sub htmlareaselectactive {
       my @fields=@_;
     if (&htmlareablocked()) { return ''; }      if (&htmlareablocked()) { return ''; }
     my $output='<script type="text/javascript" defer="1">';      my $output='<script type="text/javascript" defer="1">'.
     foreach(@_) {   &htmlareaaddbuttons();
  $output.="\nHTMLArea.replace('$_');";      foreach(@fields) {
    $output.="\nHTMLArea.replace('$_',config);";
     }      }
     $output.="\n</script>";      $output.="\nwindow.status='Activated Editfields';\n</script>";
     return $output;      return $output;
 }  }
   
Removed from v.1.72  
changed lines
  Added in v.1.75

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