X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=Debbugs%2FLog.pm;h=35881c43bf76e34fc32194d5f762843b18148dde;hb=d4abecd46f1a881a537b43552026f5a09e429642;hp=90abe9c18a6e3e7330e7ef04097d6a5ee1cf9e39;hpb=937b3fcbee18c33b3db2c8d42fbc97a40ac3164a;p=debbugs.git

diff --git a/Debbugs/Log.pm b/Debbugs/Log.pm
index 90abe9c..35881c4 100644
--- a/Debbugs/Log.pm
+++ b/Debbugs/Log.pm
@@ -268,7 +268,7 @@ sub write_log_records (*@)
 
     for my $record (@records) {
 	my $type = $record->{type};
-	my ($text) = escapelog($record->{text});
+	my ($text) = escape_log($record->{text});
 	die "type '$type' with no text field" unless defined $text;
 	if ($type eq 'autocheck') {
 	    print $logfh "\01\n$text\03\n";
@@ -297,9 +297,9 @@ sub write_log_records (*@)
     1;
 }
 
-=head2 escapelog
+=head2 escape_log
 
-     print {$log} escapelog(@log)
+     print {$log} escape_log(@log)
 
 Applies the log escape regex to the passed logfile.