Use say, not println.
This commit is contained in:
1 parent
cf45c4468a
commit
934a10d880
1 file changed
+3
-2
+3
-2
@@ -4,6 +4,7 @@
|
|||||||
package API::Std;
|
package API::Std;
|
||||||
use strict;
|
use strict;
|
||||||
use warnings;
|
use warnings;
|
||||||
|
use feature qw(say);
|
||||||
use Exporter;
|
use Exporter;
|
||||||
use base qw(Exporter);
|
use base qw(Exporter);
|
||||||
|
|
||||||
@@ -470,7 +471,7 @@ sub err ## no critic qw(Subroutines::ProhibitBuiltinHomonyms)
|
|||||||
|
|
||||||
# Level 1: Print to screen.
|
# Level 1: Print to screen.
|
||||||
if ($lvl >= 1) {
|
if ($lvl >= 1) {
|
||||||
API::Log::println("ERROR: $msg");
|
say "ERROR: $msg";
|
||||||
}
|
}
|
||||||
# Level 2: Log to file.
|
# Level 2: Log to file.
|
||||||
if ($lvl >= 2) {
|
if ($lvl >= 2) {
|
||||||
@@ -499,7 +500,7 @@ sub awarn
|
|||||||
|
|
||||||
# Level 1: Print to screen.
|
# Level 1: Print to screen.
|
||||||
if ($lvl >= 1) {
|
if ($lvl >= 1) {
|
||||||
API::Log::println("WARNING: $msg");
|
say "WARNING: $msg";
|
||||||
}
|
}
|
||||||
# Level 2: Log to file.
|
# Level 2: Log to file.
|
||||||
if ($lvl >= 2) {
|
if ($lvl >= 2) {
|
||||||
|
|||||||
Reference in new issue
Block a user