log.pl
changeset 11 80890c874a90
parent 10 21b549d5c57b
child 12 b3edfead728b
--- a/log.pl	Thu Aug 21 22:26:57 2008 +0000
+++ b/log.pl	Wed Sep 03 19:31:51 2008 +0000
@@ -171,7 +171,7 @@
 	    my $subject = (split /\n/, $text)[0];
 	    $subject =~ s/^\s*\S\s//;	# cut the "itemizer"
 	    $subject = encode_qp("Service [". hostname(). "]: $subject\n");
-	    $subject =~ s/\n(.)/\n\t\1/g;
+	    $subject =~ s/\n(.)/\n\t$1/g;
 
 	    $mailer->open({
 		"To" => $mailto,