Changeset 5645

Timestamp:

06/26/09 23:19:57 (3 years ago)

Author:

szabgab

Message:

fix 5.10 regex in 0.38 branch

File:

• branches/Padre-0.38/lib/Padre/DocBrowser/POD.pm (modified) (1 diff)

branches/Padre-0.38/lib/Padre/DocBrowser/POD.pm

@@ -131 +131 @@
 sub split_link {
         my $query = shift;
-        my($doc,$section) = $query =~ m|([^/]+)/?+(.*+)|;
+        my ($doc, $section) = split /\//, $query, 2; # was m|([^/]+)/?+(.*+)|;
 }