diff options
author | xocel <xocel@iquidus.org> | 2013-01-01 18:09:56 +1300 |
---|---|---|
committer | xocel <xocel@iquidus.org> | 2013-01-03 12:11:46 +1300 |
commit | 822555d7e43653eb5a9b2c122a30e33af41c844b (patch) | |
tree | 1304a63461eb72cf17c75e7d970b5cefa8dc28fc /sboremove | |
parent | ca238587fe160ca079c40289d5b514b55d28cf9a (diff) | |
download | sbotools-822555d7e43653eb5a9b2c122a30e33af41c844b.tar.xz |
fixes #26
Diffstat (limited to 'sboremove')
-rwxr-xr-x | sboremove | 6 |
1 files changed, 1 insertions, 5 deletions
@@ -156,11 +156,7 @@ FIRST: for my $remove (@$remove_queue) { if ( "%README%" ~~ @reqz ) { say "It is recommended that you view the README before continuing."; print "Display README now? [y]: "; - my $location = get_sbo_location($remove); - my $fh = open_read($location .'/README'); - my $readme = do {local $/; <$fh>}; - close $fh; - + my $readme = get_readme_contents get_sbo_location($remove); print "\n" . $readme if <STDIN> =~ /^[Yy\n]/; } |