diff options
| author | Yves Duret <yduret@mandriva.com> | 2001-06-11 15:28:18 +0000 |
|---|---|---|
| committer | Yves Duret <yduret@mandriva.com> | 2001-06-11 15:28:18 +0000 |
| commit | 15e8355f51d30245e1bcdd88044c2f0371542f5b (patch) | |
| tree | d2d1b660bafa0c9a46b0e3263910bc3f11891681 /transfugdrake.pm | |
| parent | 70264492814818bb1c472af4523bdc67afe58b9b (diff) | |
| download | transfugdrake-15e8355f51d30245e1bcdd88044c2f0371542f5b.tar transfugdrake-15e8355f51d30245e1bcdd88044c2f0371542f5b.tar.gz transfugdrake-15e8355f51d30245e1bcdd88044c2f0371542f5b.tar.bz2 transfugdrake-15e8355f51d30245e1bcdd88044c2f0371542f5b.tar.xz transfugdrake-15e8355f51d30245e1bcdd88044c2f0371542f5b.zip | |
update
Diffstat (limited to 'transfugdrake.pm')
| -rw-r--r-- | transfugdrake.pm | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/transfugdrake.pm b/transfugdrake.pm index 508bc0d..18c0a12 100644 --- a/transfugdrake.pm +++ b/transfugdrake.pm @@ -1,4 +1,4 @@ - #!/usr/bin/perl +#! /usr/bin/perl # # Yves Duret (yduret at mandrakesoft.com) @@ -13,7 +13,7 @@ # Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. # -use lib qw(/usr/lib/libDrakX); +use lib q(/usr/lib/libDrakX); use common qw(:common :system :file); use interactive; @@ -40,10 +40,10 @@ $::direct = /-direct/; my $in = interactive::vnew('su'); if (!(-e "/mnt/win_c")) { - print "existe pas !!!!\n"; + print "no windows partitions ?\n"; } if (-e "/mnt/win_c") { - print "existe\n"; + print "windows partitions exists\n"; } @@ -59,7 +59,7 @@ begin: step_1: $::direct or $in->ask_okcancel(_("Transfug"), -_("Pas pour les pdm. +_("Kick windows out of your life. The next step will be bringing back windows(c)(r)(tm) files"), 1) or quit_global($in, 0); |