mail/exilog/files/patch-exilog_agent.pl


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15

--- exilog_agent.pl.orig	Sat Jun  4 19:36:03 2005
+++ exilog_agent.pl	Sat Jun  4 19:39:00 2005
@@ -46,7 +46,11 @@
   };
 
   setsid();
-
+  my $me = "exilog";
+  my $pidfile = "/var/run/".$me.".pid";
+  open (PID,">$pidfile");
+  print PID $$;
+  close (PID); 
   # dup STDOUT/ERR
   open(STDOUT, ">&LOG");
   open(STDERR, ">&LOG");