diff options
| author | Andreas Brachold <vdr07@deltab.de> | 2007-12-20 13:21:23 +0000 |
|---|---|---|
| committer | Andreas Brachold <vdr07@deltab.de> | 2007-12-20 13:21:23 +0000 |
| commit | e74ce33a1b84c8bd1240f9396c0b6277ccbc9f56 (patch) | |
| tree | 6c69384b2ee735abb90b9b54e44201448227d92f /lib | |
| parent | 4c79c794a2f843d801604a02262e83506baa1120 (diff) | |
| download | xxv-e74ce33a1b84c8bd1240f9396c0b6277ccbc9f56.tar.gz xxv-e74ce33a1b84c8bd1240f9396c0b6277ccbc9f56.tar.bz2 | |
* Check full ranges of category
Diffstat (limited to 'lib')
| -rw-r--r-- | lib/XXV/OUTPUT/NEWS/JABBER.pm | 9 | ||||
| -rw-r--r-- | lib/XXV/OUTPUT/NEWS/MAIL.pm | 9 | ||||
| -rw-r--r-- | lib/XXV/OUTPUT/NEWS/RSS.pm | 9 | ||||
| -rw-r--r-- | lib/XXV/OUTPUT/NEWS/VDR.pm | 9 |
4 files changed, 28 insertions, 8 deletions
diff --git a/lib/XXV/OUTPUT/NEWS/JABBER.pm b/lib/XXV/OUTPUT/NEWS/JABBER.pm index ba424b3..a0e4438 100644 --- a/lib/XXV/OUTPUT/NEWS/JABBER.pm +++ b/lib/XXV/OUTPUT/NEWS/JABBER.pm @@ -100,8 +100,13 @@ Then you must receive a message in your running jabber client. required => gettext('This is required!'), check => sub { my $value = int(shift) || 0; - unless($value >= 1 and $value <= 100) { - return undef, sprintf(gettext('Sorry, but value must be between %d and %d'),1,100); + my $rmodule = main::getModule('REPORT'); + return undef unless($rmodule); + my $erg = $rmodule->get_level_as_array(); + unless($value >= $erg->[0]->[0] and $value <= $erg->[-1]->[0]) { + return undef, + sprintf(gettext('Sorry, but value must be between %d and %d'), + $erg->[0]->[0],$erg->[-1]->[0]); } return $value; }, diff --git a/lib/XXV/OUTPUT/NEWS/MAIL.pm b/lib/XXV/OUTPUT/NEWS/MAIL.pm index 0fbeca2..f540d6a 100644 --- a/lib/XXV/OUTPUT/NEWS/MAIL.pm +++ b/lib/XXV/OUTPUT/NEWS/MAIL.pm @@ -64,8 +64,13 @@ sub module { required => gettext('This is required!'), check => sub { my $value = int(shift) || 0; - unless($value >= 1 and $value <= 100) { - return undef, sprintf(gettext('Sorry, but value must be between %d and %d'),1,100); + my $rmodule = main::getModule('REPORT'); + return undef unless($rmodule); + my $erg = $rmodule->get_level_as_array(); + unless($value >= $erg->[0]->[0] and $value <= $erg->[-1]->[0]) { + return undef, + sprintf(gettext('Sorry, but value must be between %d and %d'), + $erg->[0]->[0],$erg->[-1]->[0]); } return $value; }, diff --git a/lib/XXV/OUTPUT/NEWS/RSS.pm b/lib/XXV/OUTPUT/NEWS/RSS.pm index 05f2f0d..f9b5026 100644 --- a/lib/XXV/OUTPUT/NEWS/RSS.pm +++ b/lib/XXV/OUTPUT/NEWS/RSS.pm @@ -63,8 +63,13 @@ sub module { required => gettext('This is required!'), check => sub { my $value = int(shift) || 0; - unless($value >= 1 and $value <= 100) { - return undef, sprintf(gettext('Sorry, but value must be between %d and %d'),1,100); + my $rmodule = main::getModule('REPORT'); + return undef unless($rmodule); + my $erg = $rmodule->get_level_as_array(); + unless($value >= $erg->[0]->[0] and $value <= $erg->[-1]->[0]) { + return undef, + sprintf(gettext('Sorry, but value must be between %d and %d'), + $erg->[0]->[0],$erg->[-1]->[0]); } return $value; }, diff --git a/lib/XXV/OUTPUT/NEWS/VDR.pm b/lib/XXV/OUTPUT/NEWS/VDR.pm index 0578b5a..2ff1346 100644 --- a/lib/XXV/OUTPUT/NEWS/VDR.pm +++ b/lib/XXV/OUTPUT/NEWS/VDR.pm @@ -60,8 +60,13 @@ sub module { required => gettext('This is required!'), check => sub { my $value = int(shift) || 0; - unless($value >= 1 and $value <= 100) { - return undef, sprintf(gettext('Sorry, but value must be between %d and %d'),1,100); + my $rmodule = main::getModule('REPORT'); + return undef unless($rmodule); + my $erg = $rmodule->get_level_as_array(); + unless($value >= $erg->[0]->[0] and $value <= $erg->[-1]->[0]) { + return undef, + sprintf(gettext('Sorry, but value must be between %d and %d'), + $erg->[0]->[0],$erg->[-1]->[0]); } return $value; }, |