diff options
author | Olivier Blin <oblin@mandriva.com> | 2007-07-31 15:36:35 +0000 |
---|---|---|
committer | Olivier Blin <oblin@mandriva.com> | 2007-07-31 15:36:35 +0000 |
commit | 44feb7965cb4fdfbb1478e446041fb1a2c27b063 (patch) | |
tree | c7318302dcebcb06e11740d53e125a8172824092 | |
parent | 6ca3b6936cc1954312481e53473d4699f638a61b (diff) | |
download | transfugdrake-44feb7965cb4fdfbb1478e446041fb1a2c27b063.tar transfugdrake-44feb7965cb4fdfbb1478e446041fb1a2c27b063.tar.gz transfugdrake-44feb7965cb4fdfbb1478e446041fb1a2c27b063.tar.bz2 transfugdrake-44feb7965cb4fdfbb1478e446041fb1a2c27b063.tar.xz transfugdrake-44feb7965cb4fdfbb1478e446041fb1a2c27b063.zip |
be more consistent in variables/steps naming
-rwxr-xr-x | transfugdrake | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/transfugdrake b/transfugdrake index bd76c41..7cb7896 100755 --- a/transfugdrake +++ b/transfugdrake @@ -9,9 +9,9 @@ use interactive; use common; my %distrib = distrib(); -my $win_disk = get_windows_disk(); +my $windows_disk = get_windows_disk(); my @linux_users = list_users(); -my @windows_users = list_windows_users($win_disk); +my @windows_users = list_windows_users($windows_disk); my %windows_bookmarks = list_windows_bookmarks(); my %windows_mail = list_windows_mail(); @@ -30,7 +30,7 @@ my $wiz = wizards->new({ welcome => { name => N("This wizard will help you to import Windows documents and settings in your %s distribution.", $distrib{system}) . "\n" . N("It allows two differents migration methods: you can either import all documents and settings by copying them, or share them between operating systems."), post => sub { - $win_disk or return 'no_win'; + $windows_disk or return 'no_windows'; $linux_user = @linux_users == 1 && $linux_users[0]; $windows_user = @windows_users == 1 && $windows_users[0]; !$linux_user || !$windows_user ? 'users' : 'files'; @@ -53,7 +53,7 @@ my $wiz = wizards->new({ }, ], post => sub { - @windows_items = list_windows_items($win_disk, $windows_user); + @windows_items = list_windows_items($windows_disk, $windows_user); 'files'; }, }, @@ -132,7 +132,7 @@ my $wiz = wizards->new({ name => N("Congratulations, your migration is now completed!"), end => 1, }, - no_win => { + no_windows => { name => N("No Windows installation has been detected."), end => 1, }, |