|
version 1.14, 2015/04/15 03:28:19
|
version 1.15, 2015/09/13 21:48:05
|
|
Line 950 sub get_block_choices {
|
Line 950 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