From 9acec3989822d432ba17f7f3414075517d4b1cc7 Mon Sep 17 00:00:00 2001 From: Tom Eastep Date: Sat, 12 Jun 2010 13:50:11 -0700 Subject: [PATCH] Fix a couple of issues with Simple TC --- Shorewall/Perl/Shorewall/Tc.pm | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/Shorewall/Perl/Shorewall/Tc.pm b/Shorewall/Perl/Shorewall/Tc.pm index b4e9de74b..f8c8099dc 100644 --- a/Shorewall/Perl/Shorewall/Tc.pm +++ b/Shorewall/Perl/Shorewall/Tc.pm @@ -492,9 +492,10 @@ sub process_simple_device() { $command .= " burst $burst"; } else { fatal_error "Missing OUT-BANDWIDTH Burst ($out_part)"; + } if ( defined $latency && $latency ne '' ) { - fatal_error "Invalid latency ($latency)" unless $latency =~ /\d+(s|sec|secs|ms|msec|msecs|us|usec|usecs)$?/ + fatal_error "Invalid latency ($latency)" unless $latency =~ /\d+(s|sec|secs|ms|msec|msecs|us|usec|usecs)$?/; $command .= " latency $latency" } else { fatal_error "Missing OUT-BANDWIDTH Latency ($out_part)";