Use say, not println.

This commit is contained in:
Elijah Perrault committed 2011-02-14 20:45:09 -07:00
1 parent cf45c4468a
commit 934a10d880
1 file changed
+3 -2
+3 -2
View File
@@ -4,6 +4,7 @@
package API::Std;
use strict;
use warnings;
use feature qw(say);
use Exporter;
use base qw(Exporter);
@@ -470,7 +471,7 @@ sub err ## no critic qw(Subroutines::ProhibitBuiltinHomonyms)
# Level 1: Print to screen.
if ($lvl >= 1) {
API::Log::println("ERROR: $msg");
say "ERROR: $msg";
}
# Level 2: Log to file.
if ($lvl >= 2) {
@@ -499,7 +500,7 @@ sub awarn
# Level 1: Print to screen.
if ($lvl >= 1) {
API::Log::println("WARNING: $msg");
say "WARNING: $msg";
}
# Level 2: Log to file.
if ($lvl >= 2) {