summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rwxr-xr-xparse-wiki5
1 files changed, 3 insertions, 2 deletions
diff --git a/parse-wiki b/parse-wiki
index 77ebc38..992b92e 100755
--- a/parse-wiki
+++ b/parse-wiki
@@ -88,9 +88,10 @@ my $url;
my $from;
my @lines = split(/\n/, $body);
while (defined($line = shift @lines)) {
- if ($line =~ m/^The following page has been changed by (.*):/) {
+ if ($line =~ m/^The .* page has been changed by (.*):/) {
$from = $1;
- $url = shift @lines
+ $url = shift @lines;
+ $url =~ s/\?.*//;
} elsif ($line =~ m/^The comment on the change is:/) {
$message = shift @lines;
last;