Simplify 'isolate_basic_target'

git-svn-id: https://shorewall.svn.sourceforge.net/svnroot/shorewall/trunk@6194 fbd18981-670d-0410-9b5c-8dc0c1a9a2bb
This commit is contained in:
teastep 2007-05-02 16:22:08 +00:00
parent d4b883a5e8
commit 16d22e9c27

View File

@ -116,7 +116,7 @@ sub merge_levels ($$) {
# Get Macro Name -- strips away trailing /* and :* from the first column in a rule, macro or action.
#
sub isolate_basic_target( $ ) {
( split '/', ( split /:/ , $_[0] )[0] )[0];
( split '[/:]', $_[0])[0];
}
#