diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2001-03-13 15:18:22 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2001-03-13 15:18:22 +0000 |
commit | 0c5cf2a95dab62dc86d3d1bf169b255c6ec97138 (patch) | |
tree | e7374c8d80b7602f1c257d46e3f4523eeea0c41e /perl-install | |
parent | 330bf1a7ba6f752689d2d2b462ee9728836b9944 (diff) | |
download | drakx-0c5cf2a95dab62dc86d3d1bf169b255c6ec97138.tar drakx-0c5cf2a95dab62dc86d3d1bf169b255c6ec97138.tar.gz drakx-0c5cf2a95dab62dc86d3d1bf169b255c6ec97138.tar.bz2 drakx-0c5cf2a95dab62dc86d3d1bf169b255c6ec97138.tar.xz drakx-0c5cf2a95dab62dc86d3d1bf169b255c6ec97138.zip |
(load_module): add some logging to know what the user did
Diffstat (limited to 'perl-install')
-rw-r--r-- | perl-install/any.pm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/perl-install/any.pm b/perl-install/any.pm index 00052540e..583cd69bf 100644 --- a/perl-install/any.pm +++ b/perl-install/any.pm @@ -685,8 +685,9 @@ For instance, ``io=0x300 irq=7''", $l), ); } } - eval { + eval { my $w = wait_load_module($in, $type, $l, $m); + log::l("user asked for loading module $m (type $type, desc $l)"); modules::load($m, $type, @options); }; if ($@) { |