diff options
author | Pascal Rigaux <pixel@mandriva.com> | 1999-09-15 13:39:50 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 1999-09-15 13:39:50 +0000 |
commit | ca56c01452ed58112ec1811c0d27dd526f6260e7 (patch) | |
tree | af5d2bf7581f841f766eb5cca7951d0e4a4e5229 /perl-install/install_any.pm | |
parent | 8d4516ae4290aeb3855804b1c74f4ae6fefe903e (diff) | |
download | drakx-ca56c01452ed58112ec1811c0d27dd526f6260e7.tar drakx-ca56c01452ed58112ec1811c0d27dd526f6260e7.tar.gz drakx-ca56c01452ed58112ec1811c0d27dd526f6260e7.tar.bz2 drakx-ca56c01452ed58112ec1811c0d27dd526f6260e7.tar.xz drakx-ca56c01452ed58112ec1811c0d27dd526f6260e7.zip |
no_comment
Diffstat (limited to 'perl-install/install_any.pm')
-rw-r--r-- | perl-install/install_any.pm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/perl-install/install_any.pm b/perl-install/install_any.pm index 2ebb6e868..6485aa759 100644 --- a/perl-install/install_any.pm +++ b/perl-install/install_any.pm @@ -38,7 +38,8 @@ sub getFile($) { *install_any::getFile = \&ftp::getFile; } else { *install_any::getFile = sub($) { - open getFile, "/tmp/rhimage/" . relGetFile($_[0]) or return; + print ">>>>>> /tmp/rhimage/" . relGetFile($_[0]), "\n"; + open getFile, "/tmp/rhimage/" . relGetFile($_[0]) or sleep(1000), return; \*getFile; }; } |