perl_checker: "$foobar" is better written without the double quotes

1 files changed, 3 insertions, 3 deletions

diff --git a/bin/drakguard b/bin/drakguard
index 9420979..3c5e254 100755
--- a/bin/drakguard
+++ b/bin/drakguard
@@ -619,7 +619,7 @@ sub write_dansguardian() {
 sub include_guardian_file {
     my ($guardian_file, $external_file) = @_;
     my $to_add = ".Include<$external_file>\n";
-    clean_config_line($guardian_file, "$to_add");
+    clean_config_line($guardian_file, $to_add);
     my @all = cat_($guardian_file);
     if ($dansguardian_bannedsitelist eq $guardian_file && !$net_control || $dansguardian_exceptionsitelist eq $guardian_file && $net_control) {
 	if (!member($to_add, @all)) {
@@ -710,7 +710,7 @@ sub apply_block_program() {
 			    #only make the permissions wright
 			    #`unprotect $diff --remove`; 
 			    remove_acl($dansguardian_protected_program_list, $diff);
-       			    clean_config_line($msec_conf, "$diff");	
+       			    clean_config_line($msec_conf, $diff);	
 			    restore_permissions($element);
 			}
 	    	    }
@@ -766,7 +766,7 @@ sub apply_block_program() {
 	            } 
 	            else { 
 	                #only make the permissions wright
-       		        clean_config_line($msec_conf, "$list");	
+       		        clean_config_line($msec_conf, $list);	
 		        restore_permissions($element);
 	            }
 	        }