use strict;
use warnings;
-use RT::Article;
use base qw/RT::URI::fsck_com_article/;
+use RT::Article;
my $scheme = "a";
# articles after stripping off the a: prefix.
if ($uri =~ /^$scheme:(\d+)/) {
- my $value = $1;
- return $self->SUPER::ParseURI($value);
+ my $value = $1;
+ return $self->SUPER::ParseURI($value);
} else {
- $self->{'uri'} = $uri;
- return undef;
+ $self->{'uri'} = $uri;
+ return undef;
}
}