From acca17d142e6d53594e519b018eaa7c2b8456aef Mon Sep 17 00:00:00 2001
From: Sebastien Helleu <flashcode@flashtux.org>
Date: Mon, 12 Apr 2010 15:29:30 +0200
Subject: [PATCH] Fix display of perl errors (use tab to force empty prefix on
 message)

---
 src/plugins/scripts/perl/weechat-perl.c | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/plugins/scripts/perl/weechat-perl.c b/src/plugins/scripts/perl/weechat-perl.c
index 5fef4e7c6..100b1a136 100644
--- a/src/plugins/scripts/perl/weechat-perl.c
+++ b/src/plugins/scripts/perl/weechat-perl.c
@@ -120,8 +120,8 @@ char *perl_weechat_code =
     "    }"
     "    return 0;"
     "}"
-    "$SIG{__WARN__} = sub { weechat::print(\"\", \"perl error: $_[0]\"); };"
-    "$SIG{__DIE__} = sub { weechat::print(\"\", \"perl error: $_[0]\"); };"
+    "$SIG{__WARN__} = sub { weechat::print(\"\", \"\tperl error: $_[0]\"); };"
+    "$SIG{__DIE__} = sub { weechat::print(\"\", \"\tperl error: $_[0]\"); };"
 };