diff options
author | Sadie Powell <sadie@witchery.services> | 2021-01-27 16:47:08 +0000 |
---|---|---|
committer | Sadie Powell <sadie@witchery.services> | 2021-01-27 16:47:08 +0000 |
commit | 859a79923a1e9df7195e1320d66b61ee162f52cc (patch) | |
tree | 691a9d5cb9aea1e587c130888b389398843b7b45 /tools/directive | |
parent | f6b861f12d070ba931d829505bfd3229653f5df2 (diff) |
Migrate some stuff away from print_format.
Diffstat (limited to 'tools/directive')
-rwxr-xr-x | tools/directive | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tools/directive b/tools/directive index 07d4b09e2..c743ed3e6 100755 --- a/tools/directive +++ b/tools/directive @@ -30,7 +30,7 @@ use make::console; use make::directive; if (scalar @ARGV < 2) { - print_format "<|GREEN Usage:|> $0 <<|UNDERLINE FILE|>> [<|UNDERLINE DIRECTIVES...|>]\n", *STDERR; + say STDERR console_format "<|GREEN Usage:|> $0 <<|UNDERLINE FILE|>> [<|UNDERLINE DIRECTIVES...|>]"; exit 1 } @@ -40,7 +40,7 @@ print_error "<|GREEN $file|> does not exist and/or is not a file!" unless -f $fi for my $directive (@ARGV) { my $value = get_directive $file, $directive, ''; if (-t STDOUT) { - print_format "<|GREEN $directive|>: $value\n"; + say console_format "<|GREEN $directive|>: $value"; } else { say $value; } |