aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rwxr-xr-xsboupgrade7
1 files 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 = <STDIN>;
exit (0) unless $test =~ /^[Yy]/;