aboutsummaryrefslogtreecommitdiff
path: root/SBO-Lib/lib/SBO
diff options
context:
space:
mode:
authorAndreas Guldstrand <andreas.guldstrand@gmail.com>2016-12-16 11:03:26 +0100
committerAndreas Guldstrand <andreas.guldstrand@gmail.com>2016-12-16 11:03:26 +0100
commit9be6ae58f74adb513f32dfe1d793df5bfb86ab26 (patch)
treee1a685aa80e3d499c7877fe603c0e9127e7c38a8 /SBO-Lib/lib/SBO
parentd720a78c55a0344d9d999839d1e92c0f604ff9c7 (diff)
downloadsbotools-9be6ae58f74adb513f32dfe1d793df5bfb86ab26.tar.xz
SBO::Lib::Readme: add documentation for ask_other_readmes
Diffstat (limited to 'SBO-Lib/lib/SBO')
-rw-r--r--SBO-Lib/lib/SBO/Lib/Readme.pm10
1 files changed, 10 insertions, 0 deletions
diff --git a/SBO-Lib/lib/SBO/Lib/Readme.pm b/SBO-Lib/lib/SBO/Lib/Readme.pm
index f01c923..e8f27f0 100644
--- a/SBO-Lib/lib/SBO/Lib/Readme.pm
+++ b/SBO-Lib/lib/SBO/Lib/Readme.pm
@@ -77,6 +77,16 @@ sub ask_opts {
return();
}
+=head2 ask_other_readmes
+
+ ask_other_readmes($sbo, $location);
+
+C<ask_other_readmes()> checks if there are other readmes for the C<$sbo> in
+C<$location>, and if so, asks the user if they should be displayed, and then
+displays them if the user didn't decline.
+
+=cut
+
sub ask_other_readmes {
my ($sbo, $location) = @_;
my @readmes = sort grep { ! m!/README$! } glob "$location/README*";