/[swish]/trunk/spider/filter.pm
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/spider/filter.pm

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

revision 61 by dpavlin, Thu Jan 29 18:26:19 2004 UTC revision 65 by dpavlin, Wed Mar 17 12:19:14 2004 UTC
# Line 48  sub filter { Line 48  sub filter {
48    
49          if ($contents =~ m,<!--SafTocEntry="([^"]+)"-->,is) {          if ($contents =~ m,<!--SafTocEntry="([^"]+)"-->,is) {
50                  $new_title = $1;                  $new_title = $1;
51          } elsif ($contents =~ m,<h\d\sclass="docPartTitle"[^>]*>(.+?)</h\d>,is) {          } elsif ($contents =~ m,<(h\d)\sclass="docPartTitle"[^>]*>(.+?)<\1>,is) {
52                  $new_title = $1;                  $new_title = $2;
53          } elsif ($contents =~ m,<h\d\sclass="docChapterTitle"[^>]*>(.+?)</h\d>,is) {          } elsif ($contents =~ m,<(h\d)\sclass="docChapterTitle"[^>]*>(.+?)<\1>,is) {
54                  $new_title = $1;                  $new_title = $2;
55          } elsif ($contents =~ m,<h\d\sclass="docSection1Title"[^>]*>(.+?)</h\d>,is) {          } elsif ($contents =~ m,<(h\d)\sclass="docSection1Title"[^>]*>(.+?)<\1>,is) {
56                  $new_title = $1;                  $new_title = $2;
57          } elsif ($contents =~ m,<h\d\sclass="chapter"[^>]*>(.+?)</h\d>,is) {          } elsif ($contents =~ m,<(h\d)\sclass="chapter"[^>]*>(.+?)<\1>,is) {
58                  $new_title = $1;                  $new_title = $2;
59          } elsif ($contents =~ m,<h\d\sclass="sect1"[^>]*>(.+?)</h\d>,is) {          } elsif ($contents =~ m,<(h\d)\sclass="sect1"[^>]*>(.+?)<\1>,is) {
60                  $new_title = $1;                  $new_title = $2;
61          } else {          } else {
62                  if ($contents =~ m,<title>([^<]+)</title>,is) {                  if ($contents =~ m,<title>([^<]+)</title>,is) {
63                          $new_title = $1;                          $new_title = $1;
Legend:
Removed from v.61  
changed lines
  Added in v.65
  ViewVC Help
Powered by ViewVC 1.1.26