diff --git a/lib/SLUB/LZA/Rosetta/TA/Command/count.pm b/lib/SLUB/LZA/Rosetta/TA/Command/count.pm index 5f527da21f8e55721bfcd158f6c9f24eb9bd877a..80cdcec65182a40b3aa82e0896c41c53b5dff4c9 100644 --- a/lib/SLUB/LZA/Rosetta/TA/Command/count.pm +++ b/lib/SLUB/LZA/Rosetta/TA/Command/count.pm @@ -1,11 +1,11 @@ package SLUB::LZA::Rosetta::TA::Command::count; +use SLUB::LZA::Rosetta::TA -command; use strict; use warnings; use feature qw(say); use SLUB::LZA::Rosetta::TA::common_sru; use SLUB::LZA::Rosetta::TA::SRU; -use SLUB::LZA::Rosetta::TA -command; # VERSION @@ -65,6 +65,7 @@ sub validate_args { my ($self, $opt, $args) = @_; # no args allowed but options! $self->usage_error("No args allowed") if @$args; + 1; } sub execute { diff --git a/lib/SLUB/LZA/Rosetta/TA/Command/init.pm b/lib/SLUB/LZA/Rosetta/TA/Command/init.pm index ce1f73708a7d5365e7d4939d2056f228e8de5029..774bec86741975cdca8da0d873d506f14c9fa54b 100644 --- a/lib/SLUB/LZA/Rosetta/TA/Command/init.pm +++ b/lib/SLUB/LZA/Rosetta/TA/Command/init.pm @@ -1,4 +1,5 @@ package SLUB::LZA::Rosetta::TA::Command::init; +use SLUB::LZA::Rosetta::TA -command; use strict; use warnings; use YAML qw(DumpFile); @@ -8,7 +9,7 @@ use Crypt::Mode::CBC; use Path::Tiny; use namespace::autoclean; -use SLUB::LZA::Rosetta::TA -command; + # VERSION @@ -21,7 +22,7 @@ sub opt_spec { ["verbose|v" => "enable verbose output"], ["rosettahost|r=s" => "host adress where Rosetta runs", {required=>1}], ["logdir|l=s" => "logdir where rosetta stores it server log files", {required=>1}], - ["authentication|a" => "enable authentification (needed if Rosetta's general parameter 'sru_authentication=true'), password is stored salted only in config file!", {required=>0}] + ["authentication|a" => "enable authentification (needed if Rosetta's general parameter 'sru_authentication=true'), password is stored salted only in config file!", {required=>0}], ["httponly" => "with this flag only HTTP (instead HTTPS) is used", {required=>0}], ); } diff --git a/lib/SLUB/LZA/Rosetta/TA/Command/log.pm b/lib/SLUB/LZA/Rosetta/TA/Command/log.pm index 612714d9714a27608d7fa1189017faed69707b6d..f82e889e6bb2a2e9fa24f4db7e665641c05bc62d 100644 --- a/lib/SLUB/LZA/Rosetta/TA/Command/log.pm +++ b/lib/SLUB/LZA/Rosetta/TA/Command/log.pm @@ -1,4 +1,5 @@ package SLUB::LZA::Rosetta::TA::Command::log; +use SLUB::LZA::Rosetta::TA -command; use strict; use warnings; use feature qw(say); @@ -8,7 +9,7 @@ use DateTime::Format::DateParse; use namespace::autoclean; use SLUB::LZA::Rosetta::TA::Log; -use SLUB::LZA::Rosetta::TA -command; + # VERSION diff --git a/lib/SLUB/LZA/Rosetta/TA/Command/search.pm b/lib/SLUB/LZA/Rosetta/TA/Command/search.pm index 31f8ed22a841ef0aab0f2307a94e405973d557c4..54cfdecb23992131a121b2dc5361c8219b2d8c6c 100644 --- a/lib/SLUB/LZA/Rosetta/TA/Command/search.pm +++ b/lib/SLUB/LZA/Rosetta/TA/Command/search.pm @@ -1,11 +1,12 @@ package SLUB::LZA::Rosetta::TA::Command::search; +use SLUB::LZA::Rosetta::TA -command; use strict; use warnings; use feature qw(say); use SLUB::LZA::Rosetta::TA::common_sru; use SLUB::LZA::Rosetta::TA::SRU; -use SLUB::LZA::Rosetta::TA -command; + # VERSION @@ -71,6 +72,7 @@ sub validate_args { my ($self, $opt, $args) = @_; # no args allowed but options! $self->usage_error("No args allowed") if @$args; + 1; } sub execute {