diff --git a/Shorewall/Perl/Shorewall/Chains.pm b/Shorewall/Perl/Shorewall/Chains.pm
index e192561..b7332e6 100644
--- a/Shorewall/Perl/Shorewall/Chains.pm
+++ b/Shorewall/Perl/Shorewall/Chains.pm
@@ -2740,8 +2740,9 @@ sub replace_references( $$$;$ ) {
 		    trace( $fromref, 'R', $rule, $_ ) if $debug;
 		}
 
-		calculate_digest( $fromref ) if $digest;
 	    }
+	    
+	    calculate_digest( $fromref ) if $digest;
 	    #
 	    # The passed chain is no longer referenced by chain $fromref
 	    #