From e4bcc12301b04a713474627ada68bb7b35e83271 Mon Sep 17 00:00:00 2001 From: Tom Eastep Date: Sun, 19 Jun 2011 18:33:10 -0700 Subject: [PATCH] Use 'here documents' rather than single quotes. Signed-off-by: Tom Eastep --- Shorewall/Perl/Shorewall/Config.pm | 12 ++++++------ 1 file changed, 6 insertions(+), 6 deletions(-) diff --git a/Shorewall/Perl/Shorewall/Config.pm b/Shorewall/Perl/Shorewall/Config.pm index c077320ba..ddabfaa55 100644 --- a/Shorewall/Perl/Shorewall/Config.pm +++ b/Shorewall/Perl/Shorewall/Config.pm @@ -3863,14 +3863,14 @@ sub update_config_file( $ ) { if ( defined $rawconfig{$_} ) { unless ( $heading_printed ) { - print $output -' + print $output <<'EOF'; + ################################################################################# # U N D O C U M E N T E D # O P T I O N S ################################################################################# -'; +EOF $heading_printed = 1; } @@ -3884,14 +3884,14 @@ sub update_config_file( $ ) { if ( supplied $rawconfig{$_} ) { if ( lc $rawconfig{$_} ne $deprecated{$_} ) { unless ( $heading_printed ) { - print $output -' + print $output <<'EOF'; + ################################################################################# # D E P R E C A T E D # O P T I O N S ################################################################################# -'; +EOF $heading_printed = 1; }