[dw-free] Add more logging to the comment importer.
[commit: http://hg.dwscoalition.org/dw-free/rev/771de5b62ea0]
Add more logging to the comment importer.
Patch by
mark.
Files modified:
Add more logging to the comment importer.
Patch by
![[staff profile]](https://www.dreamwidth.org/img/silk/identity/user_staff.png)
Files modified:
- cgi-bin/DW/Worker/ContentImporter/LiveJournal/Comments.pm
-------------------------------------------------------------------------------- diff -r a494ebe898f7 -r 771de5b62ea0 cgi-bin/DW/Worker/ContentImporter/LiveJournal/Comments.pm --- a/cgi-bin/DW/Worker/ContentImporter/LiveJournal/Comments.pm Sun May 17 17:33:33 2009 +0000 +++ b/cgi-bin/DW/Worker/ContentImporter/LiveJournal/Comments.pm Sun May 17 17:44:18 2009 +0000 @@ -101,10 +101,12 @@ sub try_work { # now backfill into jitemid_map my $jitemid_map = {}; + $log->( 'Filtering parameters: hostname=[%s], username=[%s].', $data->{hostname}, $data->{username} ); foreach my $url ( keys %$entry_map ) { # this works, see the Entries importer for more information my $turl = $url; $turl =~ s/-/_/g; # makes \b work below + $log->( 'Filtering entry URL: %s', $turl ); next unless $turl =~ /\Q$data->{hostname}\E/ && $turl =~ /\b$data->{username}\b/; @@ -123,6 +125,7 @@ sub try_work { # this works, see the Entries importer for more information my $turl = $url; $turl =~ s/-/_/g; # makes \b work below + $log->( 'Filtering comment URL: %s', $turl ); next unless $turl =~ /\Q$data->{hostname}\E/ && $turl =~ /\b$data->{username}\b/; --------------------------------------------------------------------------------