version 1.184, 2010/03/10 20:36:01
|
version 1.185, 2010/03/10 21:25:50
|
Line 117 sub wysiwygchanger {
|
Line 117 sub wysiwygchanger {
|
my $switchon=&mt('Enable WYSIWYG editor'); |
my $switchon=&mt('Enable WYSIWYG editor'); |
my $warning=''; |
my $warning=''; |
if ($env{'user.adv'}) { |
if ($env{'user.adv'}) { |
$warning.="<p>".&mt("The WYSIWYG editor only supports simple HTML and is in many cases unsuited for advanced authoring. In a number of cases, it may destroy advanced authoring involving LaTeX and script function calls.")."</p>"; |
$warning.='<p class="LC_warning">'.&mt("The WYSIWYG editor only supports simple HTML and is in many cases unsuited for advanced authoring. In a number of cases, it may destroy advanced authoring involving LaTeX and script function calls.")."</p>"; |
} |
} |
$r->print(<<ENDLSCREEN); |
$r->print(<<ENDLSCREEN); |
<form name="prefs" action="/adm/preferences" method="post"> |
<form name="prefs" action="/adm/preferences" method="post"> |
Line 1875 my @menu=
|
Line 1875 my @menu=
|
}, |
}, |
] |
] |
}, |
}, |
{ categorytitle=>'Page Display Settings', |
|
items =>[ |
|
{ linktext => 'Color Scheme', |
|
url => '/adm/preferences?action=changecolors', |
|
permission => 'F', |
|
#help => 'Change_Colors', |
|
icon => 'preferences-desktop-theme.png', |
|
linktitle => 'Change LON-CAPA default colors.' |
|
}, |
|
{ linktext => 'Menu Display', |
|
url => '/adm/preferences?action=changeicons', |
|
permission => 'F', |
|
#help => '', |
|
icon => 'preferences-system-windows.png', |
|
linktitle => 'Change whether the menus are displayed with buttons, icons or icons and text.' |
|
} |
|
|
|
] |
|
}, |
|
{ categorytitle=>'Content Display Settings', |
{ categorytitle=>'Content Display Settings', |
items =>[ |
items =>[ |
{ linktext => 'Language', |
{ linktext => 'Language', |
Line 1919 my @menu=
|
Line 1900 my @menu=
|
}, |
}, |
] |
] |
}, |
}, |
|
{ categorytitle=>'Page Display Settings', |
|
items =>[ |
|
{ linktext => 'Color Scheme', |
|
url => '/adm/preferences?action=changecolors', |
|
permission => 'F', |
|
#help => 'Change_Colors', |
|
icon => 'preferences-desktop-theme.png', |
|
linktitle => 'Change LON-CAPA default colors.' |
|
}, |
|
{ linktext => 'Menu Display', |
|
url => '/adm/preferences?action=changeicons', |
|
permission => 'F', |
|
#help => '', |
|
icon => 'preferences-system-windows.png', |
|
linktitle => 'Change whether the menus are displayed with buttons, icons or icons and text.' |
|
} |
|
|
|
] |
|
}, |
{ categorytitle=>'Messages & Notifications', |
{ categorytitle=>'Messages & Notifications', |
items =>[ |
items =>[ |
{ linktext => 'Messages & Notifications', |
{ linktext => 'Messages & Notifications', |
Line 1960 push(@{ $menu[0]->{items} }, {
|
Line 1960 push(@{ $menu[0]->{items} }, {
|
linktitle => 'Change your password.', |
linktitle => 'Change your password.', |
}); |
}); |
} |
} |
if ($env{'environment.remote'} eq 'off') { |
|
push(@{ $menu[1]->{items} }, { |
|
linktext => 'Launch Remote Control', |
|
url => '/adm/remote?url=/adm/preferences&action=launch', |
|
permission => 'F', |
|
#help => '', |
|
icon => 'remotecontrol.png', |
|
linktitle => 'Launch the remote control for LON-CAPA.', |
|
}); |
|
}else{ |
|
push(@{ $menu[1]->{items} }, { |
|
linktext => 'Collapse Remote Control', |
|
url => '/adm/remote?url=/adm/preferences&action=collapse', |
|
permission => 'F', |
|
#help => '', |
|
icon => 'remotecontrol.png', |
|
linktitle => 'Collapse the remote control for LON-CAPA.', |
|
}); |
|
} |
|
my %author_roles = &Apache::lonnet::get_my_roles($user,$domain,'userroles','',['au']); |
my %author_roles = &Apache::lonnet::get_my_roles($user,$domain,'userroles','',['au']); |
if (keys(%author_roles) > 0) { |
if (keys(%author_roles) > 0) { |
push(@{ $menu[4]->{items} }, { |
push(@{ $menu[4]->{items} }, { |