diff options
| -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; |