diff options
-rwxr-xr-x | transfugdrake | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/transfugdrake b/transfugdrake index bfeb68e..8e51a22 100755 --- a/transfugdrake +++ b/transfugdrake @@ -54,6 +54,9 @@ $::isInstall and die "Not supported during install.\n"; $::isEmbedded = ($::XID, $::CCPID) = "@ARGV" =~ /--embedded (\w+) (\w+)/; +# Application initialization +my $in = interactive::vnew(su); + local $_ = join '', @ARGV; /-h/ and die "usage: transfug [--version]\n"; @@ -63,9 +66,6 @@ $::Wizard_pix_up = "wiz_drakgw.png"; $::Wizard_title = N("Transfugdrake"); $::direct = /-direct/; -# Application initialization -my $in = interactive::vnew(su); - #- ********************************** #- * 0th step: verify if we are already set up begin: |