From 0108df4cc381df0b013addaed565595b8bb23299 Mon Sep 17 00:00:00 2001 From: Dylan William Hardison Date: Mon, 23 Jul 2018 11:20:47 -0400 Subject: more tidy --- Bugzilla/Quantum/Stdout.pm | 22 +++++++++++----------- 1 file changed, 11 insertions(+), 11 deletions(-) (limited to 'Bugzilla/Quantum/Stdout.pm') diff --git a/Bugzilla/Quantum/Stdout.pm b/Bugzilla/Quantum/Stdout.pm index 2cdba9160..699ec164a 100644 --- a/Bugzilla/Quantum/Stdout.pm +++ b/Bugzilla/Quantum/Stdout.pm @@ -22,35 +22,35 @@ has '_encoding' => ( default => '', ); -sub TIEHANDLE { ## no critic (unpack) +sub TIEHANDLE { ## no critic (unpack) my $class = shift; return $class->new(@_); } -sub PRINTF { ## no critic (unpack) +sub PRINTF { ## no critic (unpack) my $self = shift; - $self->PRINT(sprintf @_); + $self->PRINT( sprintf @_ ); } -sub PRINT { ## no critic (unpack) - my $self = shift; - my $c = $self->controller; +sub PRINT { ## no critic (unpack) + my $self = shift; + my $c = $self->controller; my $bytes = join '', @_; return unless $bytes; - if ($self->_encoding) { - $bytes = encode($self->_encoding, $bytes); + if ( $self->_encoding ) { + $bytes = encode( $self->_encoding, $bytes ); } $c->write($bytes); } sub BINMODE { - my ($self, $mode) = @_; + my ( $self, $mode ) = @_; if ($mode) { - if ($mode eq ':bytes' or $mode eq ':raw') { + if ( $mode eq ':bytes' or $mode eq ':raw' ) { $self->_encoding(''); } - elsif ($mode eq ':utf8') { + elsif ( $mode eq ':utf8' ) { $self->_encoding('utf8'); } } -- cgit v1.2.3-24-g4f1b