|
version 1.145, 2011/07/31 23:05:00
|
version 1.146, 2011/08/01 19:46:49
|
|
Line 7099 sub modify_usersessions {
|
Line 7099 sub modify_usersessions {
|
| } |
} |
| } |
} |
| } |
} |
| my @spares = sort(@okspares,$newspare); |
my @spares; |
| |
if (($newspare ne '') && (!grep(/^\Q$newspare\E$/,@okspares))) { |
| |
@spares = sort(@okspares,$newspare); |
| |
} else { |
| |
@spares = sort(@okspares); |
| |
} |
| $defaultshash{'usersessions'}{'spares'}{$lonhost}{$type} = \@spares; |
$defaultshash{'usersessions'}{'spares'}{$lonhost}{$type} = \@spares; |
| } |
} |
| if (keys(%spareschg) > 0) { |
if (keys(%spareschg) > 0) { |
![[BACK]](/icons/back.gif){kind=icon}
Return to domainprefs.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / interface