From 774ec679dec979a8489e9d5a77e4ec2380a3d38c Mon Sep 17 00:00:00 2001
From: Don Armstrong <don@volo>
Date: Tue, 30 Jan 2007 00:17:08 -0800
Subject: [PATCH] use carp to deprecate sani instead of warn

---
 scripts/errorlib.in | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/scripts/errorlib.in b/scripts/errorlib.in
index 79e306d4..18c13425 100755
--- a/scripts/errorlib.in
+++ b/scripts/errorlib.in
@@ -5,6 +5,7 @@ use Debbugs::MIME qw(decode_rfc1522 encode_rfc1522);
 use Debbugs::Packages qw(:all);
 use Debbugs::Common qw(:all);
 use Debbugs::Status qw(:all);
+use Carp;
 
 sub unlockreadbugmerge {
     local ($rv) = @_;
@@ -27,7 +28,7 @@ sub lockreadbugmerge {
 
 sub sani {
     my ($in) = @_;
-    warn "You should be using HTML::Entities instead.";
+    carp "You should be using HTML::Entities instead.";
     $in =~ s/([<>&"])/$saniarray{$1}/g;
     return $in;
 }
-- 
2.39.5