LogoopenSUSE Build Service > Projects
Sign Up | Log In

View File remove-deprecated-defined.diff of Package perl-pcsc-perl (Project home:frispete:chipcard)

Index: b/PCSC.pm
===================================================================
--- a/PCSC.pm
+++ b/PCSC.pm
@@ -66,7 +66,7 @@ sub array_to_ascii($)
 	confess ('usage Chipcard::PCSC::array_to_ascii($string)') unless defined $byte_array_ref;
 
 	# return an empty string for an empty list
-	return "" if (! defined @{$byte_array_ref});
+	return "" if (! @{$byte_array_ref});
 
 	my $return_string;
 	my $tmpVal;