diff options
author | Thierry.Vignaud <thierry.vignaud@gmail.com> | 2014-05-27 22:03:59 +0200 |
---|---|---|
committer | Thierry Vignaud <thierry.vignaud@gmail.com> | 2014-05-27 22:09:34 +0200 |
commit | 814e172024b8036aa0e5520217e94eafaca86cfb (patch) | |
tree | d0a230b79397995150a7f3a815bc9a7855b03106 /perl-install/detect_devices.pm | |
parent | a4e46a78d26a05957100cd360b07cd69d13037b0 (diff) | |
download | drakx-814e172024b8036aa0e5520217e94eafaca86cfb.tar drakx-814e172024b8036aa0e5520217e94eafaca86cfb.tar.gz drakx-814e172024b8036aa0e5520217e94eafaca86cfb.tar.bz2 drakx-814e172024b8036aa0e5520217e94eafaca86cfb.tar.xz drakx-814e172024b8036aa0e5520217e94eafaca86cfb.zip |
convert a cople comments to POD
Diffstat (limited to 'perl-install/detect_devices.pm')
-rw-r--r-- | perl-install/detect_devices.pm | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/perl-install/detect_devices.pm b/perl-install/detect_devices.pm index a8aa9bd2e..a703efc33 100644 --- a/perl-install/detect_devices.pm +++ b/perl-install/detect_devices.pm @@ -389,7 +389,12 @@ sub block_devices() { : map { $_->{dev} } do { require fs::proc_partitions; fs::proc_partitions::read_raw() }; } -#Returns a list of all CCISS devices (Compaq Smart Array). +=item getCompaqSmartArray() + +Returns a list of all CCISS devices (Compaq Smart Array). + +=cut + sub getCompaqSmartArray() { my (@idi, $f); |