extern/shorewall_code
1
0
Fork 1
mirror of https://gitlab.com/shorewall/code.git synced 2025-06-24 11:41:26 +02:00
Code Issues Packages Projects Releases Wiki Activity

More do_test() tweaks

Browse Source 
git-svn-id: https://shorewall.svn.sourceforge.net/svnroot/shorewall/trunk@7988 fbd18981-670d-0410-9b5c-8dc0c1a9a2bb
This commit is contained in:
teastep 2008-01-01 21:53:29 +00:00
parent 7272f04a2c
commit 2fa119b30a
1 changed files with 3 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
Shorewall-perl/Shorewall/Config.pm
View File

@ -511,6 +511,9 @@ sub numeric_value ( $ ) {
$mark =~ /^0/ ? oct $mark : $mark; $mark =~ /^0/ ? oct $mark : $mark;
} }
#
# Return the argument expressed in Hex
#
sub in_hex( $ ) { sub in_hex( $ ) {
sprintf '0x%x', $_[0]; sprintf '0x%x', $_[0];
} }