From 72afb8322ace13da8b3598ac9e5a543382b207d6 Mon Sep 17 00:00:00 2001 From: Jacob Pipkin Date: Sat, 1 Sep 2012 12:05:47 -0500 Subject: almost there. --- SBO-Lib/lib/SBO/Lib.pm | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'SBO-Lib/lib/SBO/Lib.pm') diff --git a/SBO-Lib/lib/SBO/Lib.pm b/SBO-Lib/lib/SBO/Lib.pm index e76fa8d..6d2916e 100644 --- a/SBO-Lib/lib/SBO/Lib.pm +++ b/SBO-Lib/lib/SBO/Lib.pm @@ -51,6 +51,7 @@ use File::Path qw(make_path remove_tree); use Fcntl; use File::Temp qw(tempdir tempfile); use Fcntl qw(F_SETFD F_GETFD); +use feature 'say'; our $tempdir = tempdir (CLEANUP => 1); @@ -660,7 +661,7 @@ sub make_clean (%) { unless ($args{SBO} && $args{SRC} && $args{VERSION}) { script_error 'make_clean requires three arguments.'; } - say "Cleaning for $args{SBO}-$args{VERSION}..."; + say "Cleaning for $args{SBO}-$args{VERSION}...\n"; my $tmpsbo = "/tmp/SBo"; remove_tree ("$tmpsbo/$args{SRC}") if -d "$tmpsbo/$args{SRC}"; remove_tree ("$tmpsbo/package-$args{SBO}") if -- cgit v1.2.3