git://git.camperquake.de
/
quotesite.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(from parent 1:
44e34ce
)
GermanBash: add german-bash.de as domain
author
Ralf Ertzinger
<ralf@skytale.net>
Tue, 5 Jul 2011 12:43:04 +0000
(14:43 +0200)
committer
Ralf Ertzinger
<ralf@skytale.net>
Tue, 5 Jul 2011 12:43:04 +0000
(14:43 +0200)
quotesite/GermanBashGrabber.pm
patch
|
blob
|
history
diff --git
a/quotesite/GermanBashGrabber.pm
b/quotesite/GermanBashGrabber.pm
index
747968c
..
361c43d
100644
(file)
--- a/
quotesite/GermanBashGrabber.pm
+++ b/
quotesite/GermanBashGrabber.pm
@@
-19,8
+19,8
@@
sub new {
my $self = $class->SUPER::new();
$self->{'NAME'} = 'germanbash';
- $self->{'PATTERNS'} = ['(http://(?:[-a-zA-Z0-9_.]+\.)*german-bash\.
org
/(\d+))',
- '(http://(?:[-a-zA-Z0-9_.]+\.)*german-bash\.
org
/action/show/id/(\d+))'];
+ $self->{'PATTERNS'} = ['(http://(?:[-a-zA-Z0-9_.]+\.)*german-bash\.
(?:org|de)
/(\d+))',
+ '(http://(?:[-a-zA-Z0-9_.]+\.)*german-bash\.
(?:org|de)
/action/show/id/(\d+))'];
bless($self, $class);
$self->_prepare_parameters();