--- loncom/lonnet/perl/lonnet.pm 2007/06/07 18:08:39 1.884 +++ loncom/lonnet/perl/lonnet.pm 2007/06/07 22:09:59 1.885 @@ -1,7 +1,7 @@ # The LearningOnline Network # TCP networking package # -# $Id: lonnet.pm,v 1.884 2007/06/07 18:08:39 albertel Exp $ +# $Id: lonnet.pm,v 1.885 2007/06/07 22:09:59 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -6338,7 +6338,7 @@ sub packages_tab_default { $do_default=1; } elsif ($pack_type eq 'extension') { 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 push(@specifics,[$package,$pack_type,$pack_part]); }