use carp to deprecate sani instead of warn

diff --git a/scripts/errorlib.in b/scripts/errorlib.in
index 79e306d413d429cb435053e6c1b94feab6e9b4fe..18c134256a9bfe72677dfa7d9e89b698196b45a6 100755 (executable)
--- 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;
 }