Only import what's needed

git-svn-id: https://shorewall.svn.sourceforge.net/svnroot/shorewall/trunk@6671 fbd18981-670d-0410-9b5c-8dc0c1a9a2bb
This commit is contained in:
teastep 2007-06-25 19:34:20 +00:00
parent 7adb433454
commit 09ad361781
2 changed files with 8 additions and 4 deletions

View File

@ -47,7 +47,6 @@ our @EXPORT = qw(
push_open push_open
pop_open pop_open
read_a_line read_a_line
read_a_line1
validate_level validate_level
qt qt
ensure_config_path ensure_config_path
@ -65,7 +64,7 @@ our @EXPORT = qw(
%globals %globals
%capabilities ); %capabilities );
our @EXPORT_OK = qw( $shorewall_dir initialize ); our @EXPORT_OK = qw( $shorewall_dir initialize read_a_line1 );
our $VERSION = 1.00; our $VERSION = 1.00;
# #

View File

@ -28,8 +28,13 @@
# #
use strict; use strict;
use lib '/usr/share/shorewall-perl'; use lib '/usr/share/shorewall-perl';
use Shorewall::Common; use Shorewall::Config qw( open_file
use Shorewall::Config; read_a_line1
split_line
fatal_error
%globals
ensure_config_path
set_shorewall_dir );
our $offset = "\t\t "; our $offset = "\t\t ";