aboutsummaryrefslogtreecommitdiff
path: root/sboremove
diff options
context:
space:
mode:
authorxocel <xocel@iquidus.org>2013-01-01 18:09:56 +1300
committerxocel <xocel@iquidus.org>2013-01-03 12:11:46 +1300
commit822555d7e43653eb5a9b2c122a30e33af41c844b (patch)
tree1304a63461eb72cf17c75e7d970b5cefa8dc28fc /sboremove
parentca238587fe160ca079c40289d5b514b55d28cf9a (diff)
downloadsbotools-822555d7e43653eb5a9b2c122a30e33af41c844b.tar.xz
fixes #26
Diffstat (limited to 'sboremove')
-rwxr-xr-xsboremove6
1 files changed, 1 insertions, 5 deletions
diff --git a/sboremove b/sboremove
index 3b92099..7e4ddfc 100755
--- a/sboremove
+++ b/sboremove
@@ -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]/;
}