say -> print for perl 5.8 compatibility

This commit is contained in:
Dima Kogan 2010-10-23 01:15:42 -07:00
parent f5ee508d25
commit 1e729e3b06

View File

@ -510,8 +510,8 @@ sub newCurve
if(scalar @curves >= $options{maxcurves}) if(scalar @curves >= $options{maxcurves})
{ {
say STDERR "Tried to exceed the --maxcurves setting."; print STDERR "Tried to exceed the --maxcurves setting.\n";
say STDERR "Invoke with a higher --maxcurves limit if you really want to do this."; print STDERR "Invoke with a higher --maxcurves limit if you really want to do this.\n";
return; return;
} }