From f98da119d445930654a50f4ab5bbe86e7210f215 Mon Sep 17 00:00:00 2001 From: Pascal Terjan Date: Mon, 26 Jan 2009 13:41:53 +0000 Subject: Only call dirname once, spotted by blino --- perl-install/standalone/drakdvb | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install') diff --git a/perl-install/standalone/drakdvb b/perl-install/standalone/drakdvb index 222d6ba13..033df401f 100755 --- a/perl-install/standalone/drakdvb +++ b/perl-install/standalone/drakdvb @@ -83,7 +83,7 @@ sub detect_channels { $_w->main; } else { $SIG{CHLD} = 'DEFAULT'; - mkdir_p(dirname(dirname($config_file))); + mkdir_p(dirname($config_file)); system("w_scan -X > $config_file"); sleep(1); POSIX::_exit($?); -- cgit v1.2.1