From 55e947d7901c17dbb1365a5cfb9f40acd50e903b Mon Sep 17 00:00:00 2001
From: EuAndreh <eu@euandre.org>
Date: Sat, 5 Jan 2019 10:38:38 -0200
Subject: Print CLI errors using Term::ANSIColor.

---
 slides/website-slides | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'slides')

diff --git a/slides/website-slides b/slides/website-slides
index cf795c4..a1f1466 100755
--- a/slides/website-slides
+++ b/slides/website-slides
@@ -39,6 +39,7 @@ use Pod::Usage qw(pod2usage);
 use File::Basename qw(dirname);
 use File::Path qw(make_path);
 use File::Copy qw(copy);
+use Term::ANSIColor;
 
 my $help = 0;
 my $name = '';
@@ -50,7 +51,7 @@ pod2usage(-verbose => 2, -exitval => 0) if $help;
 pod2usage(
   -verbose => 1,
   -exitval => 2,
-  -message => "Missing required --name argument."
+  -message => colored("Missing required --name argument.", "red")
 ) if !$name;
 
 my $dirname = dirname(__FILE__);
-- 
cgit v1.2.3