1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/standalone/diskdrake b/perl-install/standalone/diskdrake
index 4c113413a..049e9e3fa 100755
--- a/perl-install/standalone/diskdrake
+++ b/perl-install/standalone/diskdrake
@@ -24,7 +24,7 @@
 
 use lib qw(/usr/lib/libDrakX);
 use common;
-use diskdrake;
+use diskdrake_interactive;
 use standalone;
 use interactive;
 use detect_devices;
@@ -70,7 +70,7 @@ fs::get_raw_hds('', $all_hds);
 fs::merge_info_from_fstab([ fsedit::get_really_all_fstab($all_hds) ]);
 fs::merge_info_from_mtab([ fsedit::get_really_all_fstab($all_hds) ]);
 
-if (getenv("TEST_DEFAULT_OPTIONS")) {
+if ($ENV{TEST_DEFAULT_OPTIONS})) {
     fs::set_default_options($all_hds);
     fs::set_removable_mntpoints($all_hds);
 }