do not try to list windows users if no windows disk is detected

1 files changed, 2 insertions, 1 deletions

diff --git a/transfugdrake b/transfugdrake
index 4d8e423..055e5ee 100755
--- a/transfugdrake
+++ b/transfugdrake
@@ -14,7 +14,8 @@ use transfugdrake;
 my %distrib = distrib();
 my $windows_disk = transfugdrake::get_windows_disk();
 my @linux_users = list_users();
-my @windows_users = transfugdrake::list_windows_users($windows_disk);
+my @windows_users;
+@windows_users = transfugdrake::list_windows_users($windows_disk) if $windows_disk;
 
 my @windows_items;
 my $linux_user;