version 1.76, 2004/06/08 01:32:02
|
version 1.77, 2004/06/12 01:09:31
|
Line 910 ENDADDBUTTON
|
Line 910 ENDADDBUTTON
|
# ----------------------------------------------------------------- Preferences |
# ----------------------------------------------------------------- Preferences |
|
|
sub disablelink { |
sub disablelink { |
|
my @fields=@_; |
|
if (defined($#fields)) { |
|
unless ($#fields>=0) { return ''; } |
|
} |
return '<a href="/adm/preferences?action=set_wysiwyg&wysiwyg=off&returnurl='.&Apache::lonnet::escape($ENV{'REQUEST_URI'}).'">'.&mt('Disable WYSIWYG Editor').'</a>'; |
return '<a href="/adm/preferences?action=set_wysiwyg&wysiwyg=off&returnurl='.&Apache::lonnet::escape($ENV{'REQUEST_URI'}).'">'.&mt('Disable WYSIWYG Editor').'</a>'; |
} |
} |
|
|
sub enablelink { |
sub enablelink { |
|
my @fields=@_; |
|
if (defined($#fields)) { |
|
unless ($#fields>=0) { return ''; } |
|
} |
return '<a href="/adm/preferences?action=set_wysiwyg&wysiwyg=on&returnurl='.&Apache::lonnet::escape($ENV{'REQUEST_URI'}).'">'.&mt('Enable WYSIWYG Editor').'</a>'; |
return '<a href="/adm/preferences?action=set_wysiwyg&wysiwyg=on&returnurl='.&Apache::lonnet::escape($ENV{'REQUEST_URI'}).'">'.&mt('Enable WYSIWYG Editor').'</a>'; |
} |
} |
|
|
# ---------------------------------------------------------- Script to activate |
|
|
|
sub htmlareaactive { |
|
unless (&htmlareabrowser()) { return ''; } |
|
if (&htmlareablocked()) { return '<br />'.&enablelink(); } |
|
my $addbuttons=&htmlareaaddbuttons(); |
|
my $disable=&disablelink(); |
|
return (<<ENDSCRIPT); |
|
<script type="text/javascript" defer="1"> |
|
$addbuttons |
|
HTMLArea.replaceAll(config); |
|
</script><br /> |
|
$disable |
|
ENDSCRIPT |
|
} |
|
|
|
# ----------------------------------------- Script to activate only some fields |
# ----------------------------------------- Script to activate only some fields |
|
|
sub htmlareaselectactive { |
sub htmlareaselectactive { |
my @fields=@_; |
my @fields=@_; |
unless (&htmlareabrowser()) { return ''; } |
unless (&htmlareabrowser()) { return ''; } |
if (&htmlareablocked()) { return '<br />'.&enablelink(); } |
if (&htmlareablocked()) { return '<br />'.&enablelink(@fields); } |
my $output='<script type="text/javascript" defer="1">'. |
my $output='<script type="text/javascript" defer="1">'. |
&htmlareaaddbuttons(); |
&htmlareaaddbuttons(); |
foreach(@fields) { |
foreach(@fields) { |
$output.="\nHTMLArea.replace('$_',config);"; |
$output.="\nHTMLArea.replace('$_',config);"; |
} |
} |
$output.="\nwindow.status='Activated Editfields';\n</script><br />". |
$output.="\nwindow.status='Activated Editfields';\n</script><br />". |
&disablelink(); |
&disablelink(@fields); |
return $output; |
return $output; |
} |
} |
|
|