|
version 1.1202, 2012/11/30 16:46:58
|
version 1.1203, 2012/11/30 16:50:30
|
|
Line 10515 sub symbverify {
|
Line 10515 sub symbverify {
|
| if ($ids) { |
if ($ids) { |
| # ------------------------------------------------------------------- Has ID(s) |
# ------------------------------------------------------------------- Has ID(s) |
| if ($thisfn =~ m{^/adm/wrapper/ext/}) { |
if ($thisfn =~ m{^/adm/wrapper/ext/}) { |
| symb =~ s/\?.+$//; |
$symb =~ s/\?.+$//; |
| } |
} |
| foreach my $id (split(/\,/,$ids)) { |
foreach my $id (split(/\,/,$ids)) { |
| my ($mapid,$resid)=split(/\./,$id); |
my ($mapid,$resid)=split(/\./,$id); |
![[BACK]](/icons/back.gif){kind=icon}
Return to lonnet.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / lonnet / perl