diff options
-rwxr-xr-x | insert-entries.pl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/insert-entries.pl b/insert-entries.pl index fe46de8..71f4dbd 100755 --- a/insert-entries.pl +++ b/insert-entries.pl @@ -117,7 +117,7 @@ sub get_node_lang { my $xpc = XML::LibXML::XPathContext->new($doc); #$xpc->registerNs('h', XHTML_NS); -my $entry_list = $xpc->findnodes("//weblog/entry"); +my $entry_list = $xpc->findnodes("//d:weblog/d:entry"); foreach my $node ( $entry_list->get_nodelist ) { my $id = $node->getAttribute("number")+0; my $date = $node->getAttribute("date"); @@ -129,7 +129,7 @@ foreach my $node ( $entry_list->get_nodelist ) { $sth_check->execute($id); my $exists = $sth_check->rows; next if $exists && ($sth_check->fetchrow_array)[0] eq $sha1; - my $title_node = ($xpc->findnodes("title", $node))[0]; + my $title_node = ($xpc->findnodes("d:title", $node))[0]; my $title = defined($title_node)?$title_node->textContent:undef; my $title_xml = defined($title_node)?$title_node->serialize:undef; my $cdate; |