loncom/lonnet/perl/lonnet.pm - diff

Return to lonnet.pm CVS log

Up to [LON-CAPA] / loncom / lonnet / perl

version 1.884, 2007/06/07 18:08:39	version 1.885, 2007/06/07 22:09:59
Line 6338 sub packages_tab_default {	Line 6338 sub packages_tab_default {
$do_default=1;	$do_default=1;
} elsif ($pack_type eq 'extension') {	} elsif ($pack_type eq 'extension') {
push(@extension,[$package,$pack_type,$pack_part]);	push(@extension,[$package,$pack_type,$pack_part]);
} elsif ($pack_part eq $part) {	} elsif ($pack_part eq $part \|\| $pack_type eq 'part') {
# only look at packages defaults for packages that this id is	# only look at packages defaults for packages that this id is
push(@specifics,[$package,$pack_type,$pack_part]);	push(@specifics,[$package,$pack_type,$pack_part]);
}	}