/[hyperestraier_wrappers]/trunk/perl/scripts/est-spider
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /trunk/perl/scripts/est-spider

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 29 by dpavlin, Sat Sep 17 23:55:09 2005 UTC revision 30 by dpavlin, Sun Sep 18 18:21:06 2005 UTC
# Line 191  sub file { Line 191  sub file {
191                          print STDERR " $page_nr" if ($verbose);                          print STDERR " $page_nr" if ($verbose);
192                          my $pre_tmp = $pre_html;                          my $pre_tmp = $pre_html;
193                          $pre_tmp =~ s/##page_nr##/$page_nr<\/title>/s;                          $pre_tmp =~ s/##page_nr##/$page_nr<\/title>/s;
194                          dump_contents($db, $pre_tmp . $page . $post_html, $mtime, $path) if ($page !~ m/^\s*$/s);                          dump_contents($db, $pre_tmp . $page . $post_html, $mtime, "$path#$page_nr") if ($page !~ m/^\s*$/s);
195                          $page_nr++;                          $page_nr++;
196                  }                  }
197    
Legend:
Removed from v.29  
changed lines
  Added in v.30
  ViewVC Help
Powered by ViewVC 1.1.26