|
version 1.17, 2016/01/27 03:04:49
|
version 1.18, 2016/03/04 21:43:15
|
|
Line 951 sub get_block_choices {
|
Line 951 sub get_block_choices {
|
| |
|
| sub check_release_required { |
sub check_release_required { |
| my ($value,$chomemajor,$chomeminor) = @_; |
my ($value,$chomemajor,$chomeminor) = @_; |
| my $needsrelease = $Apache::lonnet::needsrelease{'course:commblock:'.$value.':'}; |
my $needsrelease = $Apache::lonnet::needsrelease{'course:commblock:'.$value}; |
| if ($needsrelease) { |
if ($needsrelease) { |
| my ($needsmajor,$needsminor) = split(/\./,$needsrelease); |
my ($needsmajor,$needsminor) = split(/\./,$needsrelease); |
| if (($chomemajor < $needsmajor) || |
if (($chomemajor < $needsmajor) || |
![[BACK]](/icons/back.gif){kind=icon}
Return to lonblockingmenu.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / interface