Ignore:
Timestamp:
2000-06-28T09:52:58+12:00 (24 years ago)
Author:
sjboddie
Message:

Fixed a bug that davidb found in a couple of regular expressions

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/gsdl/perllib/plugins/HTMLPlug.pm

    r1244 r1245  
    143143        $self->replace_usemap_links($1, $2, $3)/isge;
    144144
    145     $$textref =~ s/(<(?:a|area|frame|link)\s+[^>]*?(?:href|src)\s*=\s*\"?)([^\">\s]+)(\"?[^>]*>)/
     145    $$textref =~ s/(<(?:a|area|frame|link)\s+[^>]*? (?:href|src)\s*=\s*\"?)([^\">\s]+)(\"?[^>]*>)/
    146146        $self->replace_href_links ($1, $2, $3, $base_dir, $file, $doc_obj, $cursection)/isge;
    147147    }
    148148
    149149    # trap images
    150     $$textref =~ s/(<img[^>]*?src\s*=\s*\"?)([^\">\s]+)(\"?[^>]*>)/
     150    $$textref =~ s/(<img[^>]*? src\s*=\s*\"?)([^\">\s]+)(\"?[^>]*>)/
    151151    $self->replace_images ($1, $2, $3, $base_dir, $file, $doc_obj, $cursection)/isge;
    152152
Note: See TracChangeset for help on using the changeset viewer.