From 78a25bb51b12cd2ce53910ba12df323862bfbc8b Mon Sep 17 00:00:00 2001
From: Tom Eastep <teastep@shorewall.net>
Date: Tue, 30 Aug 2011 16:43:38 -0700
Subject: [PATCH] Avoid undefined value error.

Signed-off-by: Tom Eastep <teastep@shorewall.net>
---
 Shorewall/Perl/Shorewall/Tc.pm | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/Shorewall/Perl/Shorewall/Tc.pm b/Shorewall/Perl/Shorewall/Tc.pm
index 26cf6e400..290e378ad 100644
--- a/Shorewall/Perl/Shorewall/Tc.pm
+++ b/Shorewall/Perl/Shorewall/Tc.pm
@@ -1425,6 +1425,8 @@ sub process_tcpri() {
 #
 sub process_traffic_shaping() {
 
+    our $lastrule = '';
+
     my $fn = open_file 'tcdevices';
 
     if ( $fn ) {