loncom/xml/lonxml.pm - diff

Return to lonxml.pm CVS log

Up to [LON-CAPA] / loncom / xml

Diff for /loncom/xml/lonxml.pm between versions 1.462 and 1.463

-version 1.462, 2007/10/08 09:20:22
+version 1.463, 2007/10/10 00:02:27
  Line 1464  sub inserteditinfo {
        my $initialize='';
        my $textarea_id = 'filecont';
        my ($add_to_onload, $add_to_onresize);
-       my $addbuttons=&Apache::lonhtmlcommon::htmlareaaddbuttons();
        $initialize=&Apache::lonhtmlcommon::spellheader();
        if ($filetype eq 'html'
  	  && (!&Apache::lonhtmlcommon::htmlareablocked() &&
  	      &Apache::lonhtmlcommon::htmlareabrowser())) {
- 	  $textarea_id .= '_htmlarea';
+ 	  $textarea_id .= '___Frame';
+ 	  my $lang = &Apache::lonhtmlcommon::htmlarea_lang();
  	  $initialize.=(<<FULLPAGE);
  <script type="text/javascript">
- $addbuttons
+ lonca
-     HTMLArea.loadPlugin("FullPage");
      function initDocument() {
- 	var editor=new HTMLArea("filecont",config);
+         var oFCKeditor = new FCKeditor('filecont');
- 	editor.registerPlugin(FullPage);
+ 	oFCKeditor.Config['CustomConfigurationsPath'] = '/fckeditor/loncapaconfig.js'  ;
- 	editor.generate();
+ 	oFCKeditor.Config['FullPage'] = true
- 	setTimeout(
+ 	oFCKeditor.Config['AutoDetectLanguage'] = false;
- 		   function () {
+         oFCKeditor.Config['DefaultLanguage'] = "$lang";
- 		       HTMLArea._addEvents(editor._doc,
+ 	oFCKeditor.ReplaceTextarea();
- 					   ["keypress","mousedown"], unClean);
+     }
- 		       editor._iframe.id = '$textarea_id';
+     function check_if_dirty(editor) {
- 		       resize_textarea('$textarea_id','LC_aftertextarea');
+ 	if (editor.IsDirty()) {
- 		   },300);
+ 	    unClean();
+ 	}
+     }
+     function FCKeditor_OnComplete(editor) {
+ 	editor.Events.AttachEvent("OnSelectionChange",check_if_dirty);
+ 	resize_textarea('$textarea_id','LC_aftertextarea');
      }
  </script>
  FULLPAGE

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

Removed from v.1.462
changed lines
	Added in v.1.463