diff --git a/lib/SLUB/LZA/TA/Command/count.pm b/lib/SLUB/LZA/TA/Command/count.pm index f81fba5480b5a924e18ecc2e2d8f58c909f06e24..c54cdacd38856e45025707249f6e5a34d2dcda3d 100644 --- a/lib/SLUB/LZA/TA/Command/count.pm +++ b/lib/SLUB/LZA/TA/Command/count.pm @@ -66,6 +66,7 @@ sub opt_spec { } sub validate_args { my ($self, $opt, $args) = @_; + SLUB::LZA::TA::common_global_validate($self, $opt, $args); # no args allowed but options! $self->usage_error("No args allowed") if @$args; if (exists $opt->{creationdate}) { diff --git a/lib/SLUB/LZA/TA/Command/report.pm b/lib/SLUB/LZA/TA/Command/report.pm index c27457aceed6dd52a56f25cca95c6dd998309eca..99facd64c48c6e4312b4f97d082c621d81a65ac6 100644 --- a/lib/SLUB/LZA/TA/Command/report.pm +++ b/lib/SLUB/LZA/TA/Command/report.pm @@ -74,9 +74,9 @@ sub opt_spec { } sub validate_args { my ($self, $opt, $args) = @_; + SLUB::LZA::TA::common_global_validate($self, $opt, $args); # no args allowed but options! $self->usage_error("No args allowed") if @$args; - SLUB::LZA::TA::validate_global(@_); my ($cyear, $cmonth, $cday) = Today(); my ($from_year, $from_month, $from_day); my ($to_year, $to_month, $to_day); diff --git a/lib/SLUB/LZA/TA/Command/search.pm b/lib/SLUB/LZA/TA/Command/search.pm index 9d0baae40dd69244f3967254b3b2412b2fbe1696..d95d0d6de460b2482d5a85ea0100361b7be30be0 100644 --- a/lib/SLUB/LZA/TA/Command/search.pm +++ b/lib/SLUB/LZA/TA/Command/search.pm @@ -120,6 +120,7 @@ sub opt_spec { } sub validate_args { my ($self, $opt, $args) = @_; + SLUB::LZA::TA::common_global_validate($self, $opt, $args); # no args allowed but options! $self->usage_error("No args allowed") if @$args; if (exists $opt->{creationdate}) {