Description: a workaround for #469155 in liblog-dispatch-perl:
  don't die if syslogd isn't running
  this is important because we use RT.pm from the maintainer
  scripts through rt-setup-database, and the lack of syslogd
  shouldn't make them fail.
  .
  This patch should be kept until liblog-dispatch-perl >= 2.22-1
  is in stable.
Author: Niko Tyni <ntyni@debian.org>
Forwarded: not-needed

diff --git a/lib/RT.pm b/lib/RT.pm
index d2822eb..dc6dcd8 100755
--- a/lib/RT.pm
+++ b/lib/RT.pm
@@ -49,6 +49,17 @@
 use strict;
 use warnings;
 
+package Log::Dispatch::MySyslog;
+require Log::Dispatch::Syslog;
+our(@ISA) = (qw(Log::Dispatch::Syslog));
+sub log_message {
+  my $self = shift;
+  eval { $self->SUPER::log_message(@_); };
+  if ($@) {
+    print "Failed send log message to Syslog: $@";
+  }
+}
+
 package RT;
 
 
@@ -335,8 +346,7 @@ sub InitLogging {
                          ));
         }
         if ( $Config->Get('LogToSyslog') ) {
-            require Log::Dispatch::Syslog;
-            $RT::Logger->add(Log::Dispatch::Syslog->new
+            $RT::Logger->add(Log::Dispatch::MySyslog->new
                          ( name => 'syslog',
                            ident => 'RT',
                            min_level => $Config->Get('LogToSyslog'),
