From cb132e2421da3547dbf334744d0f7983ea3cf443 Mon Sep 17 00:00:00 2001
From: Tom Eastep <teastep@shorewall.net>
Date: Tue, 11 Jun 2013 06:29:07 -0700
Subject: [PATCH] Include the chain name in the 'unreachable' warning.

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

diff --git a/Shorewall/Perl/Shorewall/Chains.pm b/Shorewall/Perl/Shorewall/Chains.pm
index 43832c113..3e7758759 100644
--- a/Shorewall/Perl/Shorewall/Chains.pm
+++ b/Shorewall/Perl/Shorewall/Chains.pm
@@ -6535,7 +6535,7 @@ sub unreachable_warning( $$ ) {
     my ( $ignore, $chainref ) = @_;
     unless ( $ignore ) {
 	if ( $chainref->{complete} ) {
-	    warning_message "Any rules generated by this entry are unreachable and will therefore be discarded" unless $chainref->{unreachable_warned}++;
+	    warning_message "Unreachable rule(s) in chain $chainref->{name} have been discarded" unless $chainref->{unreachable_warned}++;
 	    return 1;
 	}
     }