From 697b0377a39d3a8769d2639ffc9b89c67f37323d Mon Sep 17 00:00:00 2001 From: Jacob Pipkin Date: Sat, 26 May 2012 10:33:34 -0500 Subject: fix bug where only first line of README was being output --- sboupgrade | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) diff --git a/sboupgrade b/sboupgrade index 7f50839..46dd7ef 100755 --- a/sboupgrade +++ b/sboupgrade @@ -87,9 +87,10 @@ sub readme_prompt { script_error ('readme_prompt requires an argument.') unless exists $_[0]; my $sbo = shift; my $readme_path = get_readme_path ($sbo); - open my $readme, '<', $readme_path; - print "\n". <$readme>; - close ($readme); + open my $readme_file, '<', $readme_path; + my $readme = do {local $/; <$readme_file>}; + print "\n". $readme; + close ($readme_file); print "\nProceed with $sbo? [yn]: "; my $test = ; exit (0) unless $test =~ /^[Yy]/; -- cgit v1.2.3