Changeset 2093
- Timestamp:
- Dec 17, 2011, 12:00:18 AM (13 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/server/fedora/config/etc/syslog-ng/d_zroot.pl
r2066 r2093 17 17 @USERS{@USERS} = undef; 18 18 19 sub zwrite($;$$@) { 20 my ($message, $class, $instance, @recipients) = @_; 19 sub zwrite($;$$\@) { 20 my ($message, $class, $instance, $recipref) = @_; 21 my @recipients = (); 22 if (defined($recipref)) { 23 if (@$recipref) { 24 @recipients = @$recipref; 25 } else { 26 $message = '@b(Empty recipient list specified, message redacted)'; 27 } 28 } 21 29 $class ||= $ZCLASS; 22 30 $instance ||= 'root.'.hostname; … … 24 32 print ZWRITE $message; 25 33 close(ZWRITE); 34 } 35 36 unless (@RECIPIENTS) { 37 zwrite('@b(No .k5login found, sensitive logs will not be zephyred)', $ZCLASS); 26 38 } 27 39 … … 126 138 127 139 foreach my $class (keys %toclass) { 128 if ($class eq "scripts-auto") {140 if ($class eq $ZCLASS) { 129 141 zwrite($toclass{$class}, $class); 130 142 } else {
Note: See TracChangeset
for help on using the changeset viewer.