[Fix] Fix CGP escaping

diff --git a/utils/cgp_rspamd.pl b/utils/cgp_rspamd.pl
index 90fa43f9044aed20d6223af711c3da82f8068f1b..f387dd877c50efa6f8cec5cd3d39fcd4aa5051a2 100644 (file)
--- a/utils/cgp_rspamd.pl
+++ b/utils/cgp_rspamd.pl
@@ -41,9 +41,10 @@ $| = 1;
 sub cgp_string {
   my ($in) = @_;
 
-  $in =~ s/\"/\\"/;
-  $in =~ s/\n/\\n/;
-  $in =~ s/\r/\\r/;
+  $in =~ s/\"/\\"/g;
+  $in =~ s/\n/\\n/gms;
+  $in =~ s/\r/\\r/mgs;
+  $in =~ s/\t/  /g;
 
   return "\"$in\"";
 }