diff options
| -rw-r--r-- | src/MTools.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/MTools.pm b/src/MTools.pm index d47d81e..fb7ff74 100644 --- a/src/MTools.pm +++ b/src/MTools.pm @@ -239,7 +239,7 @@ sub mconfigure { { %zinc_props = %options; } - if (defined %zinc_props) + if (%zinc_props) { eval { @@ -263,7 +263,7 @@ sub mconfigure { # d'un objets zinc. sub plink { my (@objets) = @_; - if (!defined @objets) {return;} + if (! @objets) {return;} for (my $i = 0; $i < @objets; $i ++) { |