diff options
author | Thierry Vignaud <thierry.vignaud@gmail.com> | 2014-05-27 22:09:42 +0200 |
---|---|---|
committer | Thierry Vignaud <thierry.vignaud@gmail.com> | 2014-05-27 22:10:55 +0200 |
commit | eaec540f06faea282d3565c722380b2795c5198a (patch) | |
tree | 90ae0372fce6d583ecbcea11bc3d1db8c00a6226 /perl-install/fs | |
parent | 814e172024b8036aa0e5520217e94eafaca86cfb (diff) | |
download | drakx-eaec540f06faea282d3565c722380b2795c5198a.tar drakx-eaec540f06faea282d3565c722380b2795c5198a.tar.gz drakx-eaec540f06faea282d3565c722380b2795c5198a.tar.bz2 drakx-eaec540f06faea282d3565c722380b2795c5198a.tar.xz drakx-eaec540f06faea282d3565c722380b2795c5198a.zip |
explain dmraid debugging
Diffstat (limited to 'perl-install/fs')
-rw-r--r-- | perl-install/fs/dmraid.pm | 12 |
1 files changed, 8 insertions, 4 deletions
diff --git a/perl-install/fs/dmraid.pm b/perl-install/fs/dmraid.pm index 21af87e89..378d978fd 100644 --- a/perl-install/fs/dmraid.pm +++ b/perl-install/fs/dmraid.pm @@ -172,6 +172,14 @@ sub migrate_device_names { } } +=back + +=head1 Debugging + +If $ENV{DRAKX_DEBUG_DMRAID} is set, debugging dmraid is done. +The C<call_dmraid() function is overloaded and will spit out warnings. +=cut + if ($ENV{DRAKX_DEBUG_DMRAID}) { eval(<<'EOF'); my %debug_data = ( @@ -271,8 +279,4 @@ EOF $@ and die; } -=back - -=cut - 1; |