From: Ivan Kohler <ivan@freeside.biz>
Date: Sat, 29 Aug 2015 22:52:12 +0000 (-0700)
Subject: quiet "Posible precedence issue with control flow operator" warning under 5.20+ ... 
X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=commitdiff_plain;h=407b4dbfd15fb120a06a9c2da4fe77137aebdacf

quiet "Posible precedence issue with control flow operator" warning under 5.20+ (deb 8)
---

diff --git a/FS/FS/qual.pm b/FS/FS/qual.pm
index 07878e9c2..04ee0e152 100644
--- a/FS/FS/qual.pm
+++ b/FS/FS/qual.pm
@@ -180,7 +180,7 @@ sub part_export {
     my $self = shift;
     if ( $self->exportnum ) {
 	return qsearchs('part_export', { exportnum => $self->exportnum } )
-		or die 'invalid exportnum';
+		|| die 'invalid exportnum';
     }
     '';
 }