From 26e4479959d6dab37fb2f88948372b31a48b4627 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Wed, 25 Apr 2007 10:08:21 +0000 Subject: re-sync after the big svn loss --- bin/drakfirewall | 32 ++++++++++++++++++++++++++++++++ 1 file changed, 32 insertions(+) create mode 100755 bin/drakfirewall diff --git a/bin/drakfirewall b/bin/drakfirewall new file mode 100755 index 0000000..093543c --- /dev/null +++ b/bin/drakfirewall @@ -0,0 +1,32 @@ +#!/usr/bin/perl + +# Copyright (C) 1999-2005 Mandriva (pixel@mandrakesoft.com) +# +# This program is free software; you can redistribute it and/or modify +# it under the terms of the GNU General Public License as published by +# the Free Software Foundation; either version 2, or (at your option) +# any later version. +# +# This program is distributed in the hope that it will be useful, +# but WITHOUT ANY WARRANTY; without even the implied warranty of +# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +# GNU General Public License for more details. +# +# You should have received a copy of the GNU General Public License +# along with this program; if not, write to the Free Software +# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. + +use lib qw(/usr/lib/libDrakX); + +use standalone; #- warning, standalone must be loaded very first, for 'explanations' + +use interactive; +use network::drakfirewall; + +$ugtk2::wm_icon = "/usr/share/mcc/themes/default/firewall-mdk.png"; + +my $in = 'interactive'->vnew('su'); + +network::drakfirewall::main($in, undef); + +$in->exit; -- cgit v1.2.1