[libmoosex-has-sugar-perl] 36/120: Properly parenthesize other things
Intrigeri
intrigeri at moszumanska.debian.org
Wed Aug 27 21:35:08 UTC 2014
This is an automated email from the git hooks/post-receive script.
intrigeri pushed a commit to annotated tag 0.05070422-source
in repository libmoosex-has-sugar-perl.
commit c106b524b2ace7b512f8632379c801e87527ca91
Author: Kent Fredric <kentfredric at gmail.com>
Date: Thu Oct 24 07:21:23 2013 +1300
Properly parenthesize other things
---
before_script.pl | 2 +-
install_deps.pl | 4 ++--
2 files changed, 3 insertions(+), 3 deletions(-)
diff --git a/before_script.pl b/before_script.pl
index f7d63f7..8c70d73 100644
--- a/before_script.pl
+++ b/before_script.pl
@@ -5,7 +5,7 @@ use warnings;
use utf8;
sub diag { print STDERR @_; print STDERR "\n" }
sub env_exists { return exists $ENV{ $_[0] } }
-sub env_true { return env_exists( $_[0] ) and $ENV{ $_[0] } }
+sub env_true { return ( env_exists( $_[0] ) and $ENV{ $_[0] } ) }
sub safe_exec {
my ( $command, @params ) = @_;
diff --git a/install_deps.pl b/install_deps.pl
index 9d6c091..8eaa4d3 100644
--- a/install_deps.pl
+++ b/install_deps.pl
@@ -5,8 +5,8 @@ use utf8;
sub diag { print STDERR @_; print STDERR "\n" }
sub env_exists { return exists $ENV{ $_[0] } }
-sub env_true { return env_exists( $_[0] ) and $ENV{ $_[0] } }
-sub env_is { return env_exists( $_[0] ) and $ENV{ $_[0] } eq $_[1] }
+sub env_true { return ( env_exists( $_[0] ) and $ENV{ $_[0] } ) }
+sub env_is { return ( env_exists( $_[0] ) and $ENV{ $_[0] } eq $_[1] ) }
sub safe_exec_nonfatal {
my ( $command, @params ) = @_;
--
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libmoosex-has-sugar-perl.git
More information about the Pkg-perl-cvs-commits
mailing list