diff options
| author | Thierry Vignaud <thierry.vignaud@gmail.com> | 2013-11-22 21:54:49 +0100 |
|---|---|---|
| committer | Thierry Vignaud <thierry.vignaud@gmail.com> | 2013-11-24 11:00:45 +0100 |
| commit | db6249d49a42d35e5c33a4ca90e5713ee8a8e580 (patch) | |
| tree | 204954104c373f51d15504f7ada59a2f5d0cfaeb | |
| parent | ea238637fa0c0f3df450301201d0f425cdfbb30f (diff) | |
| download | drakx-net-db6249d49a42d35e5c33a4ca90e5713ee8a8e580.tar drakx-net-db6249d49a42d35e5c33a4ca90e5713ee8a8e580.tar.gz drakx-net-db6249d49a42d35e5c33a4ca90e5713ee8a8e580.tar.bz2 drakx-net-db6249d49a42d35e5c33a4ca90e5713ee8a8e580.tar.xz drakx-net-db6249d49a42d35e5c33a4ca90e5713ee8a8e580.zip | |
perl_checker cleanup
| -rwxr-xr-x | bin/draksambashare | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/bin/draksambashare b/bin/draksambashare index 42d864d..f3bd4ff 100755 --- a/bin/draksambashare +++ b/bin/draksambashare @@ -1264,7 +1264,7 @@ sub global_special_options() { } my $conf = "/etc/group"; - my @groups = map { if_(m/^([^#:]+):[^:]+:([^:]+):/ and $2 > 499, $1) } cat_($conf); + my @groups = map { if_(m/^([^#:]+):[^:]+:([^:]+):/ && $2 > 499, $1) } cat_($conf); foreach (@groups) { system(qw(net groupmap add), "unixgroup=$_", "ntgroup=$_"); } @@ -1493,6 +1493,6 @@ $W->add(gtkpack_(Gtk3::VBox->new(0,0), ), ); -check_first_launch; +check_first_launch(); $W->show_all; Gtk3->main; |