From a6586fec3121176d79f999fc22c831f25f91e4e5 Mon Sep 17 00:00:00 2001
From: Peter Palfrader <peter@palfrader.org>
Date: Tue, 14 Jan 2003 07:36:56 +0000
Subject: Fix indention bug with multi line log messages

---
 Echolot/Log.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/Echolot/Log.pm b/Echolot/Log.pm
index 7a04ec3..6fd17f5 100644
--- a/Echolot/Log.pm
+++ b/Echolot/Log.pm
@@ -1,7 +1,7 @@
 package Echolot::Log;
 
 # (c) 2002 Peter Palfrader <peter@palfrader.org>
-# $Id: Log.pm,v 1.4 2003/01/14 07:32:58 weasel Exp $
+# $Id: Log.pm,v 1.5 2003/01/14 07:36:56 weasel Exp $
 #
 
 =pod
@@ -45,7 +45,7 @@ sub header_log($$) {
 	my $logstring = $time.' '.
 		'['.uc($level).']'. ' '.
 		$msg."\n";
-	$logstring =~ s/(?<=.)^/	/mg;
+	$logstring =~ s/\n/\n	/mg;
 	return $logstring;
 };
 
-- 
cgit v1.2.3