Changeset 589

Timestamp:

1999-09-15T12:38:46+12:00 (25 years ago)

Author:

sjboddie

Message:

fixed bug in regular expression

File:

• trunk/gsdl/perllib/plugins/HTMLPlug.pm (modified) (1 diff)

trunk/gsdl/perllib/plugins/HTMLPlug.pm

@@ -125 +125 @@
 
     # fix up the image links
-    $text =~ s/(<img[^>]*?src=\"?)([^\">]+)(\"?[^>]*>)/
+    $text =~ s/(<img[^>]*?src\s*=\s*\"?)([^\">]+)(\"?[^>]*>)/
     &replace_image_links($absdir, $doc_obj, $1, $2, $3)/ige;