![[BACK]](/icons/back.gif){kind=icon}
Return to lonpublisher.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / publisher|
Return to lonpublisher.pm CVS log | Up to [LON-CAPA] / loncom / publisher |
| version 1.206, 2006/01/13 22:17:12 | version 1.207, 2006/01/24 22:09:36 |
|---|---|
| Line 547 sub get_max_ids_indices { | Line 547 sub get_max_ids_indices { |
| my %duplicatedids; | my %duplicatedids; |
| my $parser=HTML::LCParser->new($content); | my $parser=HTML::LCParser->new($content); |
| $parser->xml_mode(1); | |
| my $token; | my $token; |
| while ($token=$parser->get_token) { | while ($token=$parser->get_token) { |
| if ($token->[0] eq 'S') { | if ($token->[0] eq 'S') { |