Commit b5eb179b authored by intrigeri's avatar intrigeri
Browse files

Upgrader: streamline function arguments type constraints checks

parent 7127511e
......@@ -31,6 +31,7 @@ use Function::Parameters;
use IPC::System::Simple qw{capturex};
use Path::Tiny;
use Types::Path::Tiny qw{AbsDir AbsFile Path};
use Types::Standard qw{Str};
=head1 FUNCTIONS
......@@ -103,8 +104,9 @@ fun space_available_in (AbsDir $dir) {
return $df->{bavail};
}
fun verify_signature ($txt, $signature_txt, AbsDir $trusted_gnupg_homedir) {
assert_defined($txt);
fun verify_signature (Str $txt,
Str $signature_txt,
AbsDir $trusted_gnupg_homedir) {
assert_nonblank($signature_txt);
my $gnupg = GnuPG::Interface->new();
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment