From a845140044510ef3fdc179b333301218d3faefe5 Mon Sep 17 00:00:00 2001
From: Guillaume Cottenceau <gc@mandriva.com>
Date: Fri, 18 Jan 2002 20:22:20 +0000
Subject: - write the 'common' part of the 'explanations' stuff,   with nice
 help from Pixel for the tough Perl part - move 'use standalone' up in all
 standalone apps,   to comply to 'explanations'

---
 perl-install/c/stuff.xs.pm | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

(limited to 'perl-install/c')

diff --git a/perl-install/c/stuff.xs.pm b/perl-install/c/stuff.xs.pm
index 59d8fe232..3176e3515 100644
--- a/perl-install/c/stuff.xs.pm
+++ b/perl-install/c/stuff.xs.pm
@@ -310,10 +310,11 @@ void
 closelog()
 
 void
-syslog(mesg)
+syslog(priority, mesg)
+  int priority
   char *mesg
   CODE:
-  syslog(LOG_WARNING, mesg);
+  syslog(priority, mesg);
 
 void
 setsid()
@@ -1013,6 +1014,7 @@ int rpmvercmp(char *a, char *b);
        HDIO_GETGEO BLKGETSIZE LOOP_GET_STATUS
        MS_MGC_VAL MS_RDONLY O_NONBLOCK F_SETFL F_GETFL O_CREAT SECTORSIZE WNOHANG
        VT_ACTIVATE VT_WAITACTIVE VT_GETSTATE CDROM_LOCKDOOR CDROMEJECT
+       LOG_WARNING LOG_INFO LOG_LOCAL1
        ) ],
 );
 push @macros, [ qw(int RPMTAG_NAME RPMTAG_GROUP RPMTAG_SIZE RPMTAG_VERSION RPMTAG_SUMMARY RPMTAG_DESCRIPTION RPMTAG_RELEASE RPMTAG_EPOCH RPMTAG_ARCH RPMTAG_OBSOLETES RPMTAG_REQUIRENAME RPMTAG_FILEFLAGS     RPMFILE_CONFIG) ]
-- 
cgit v1.2.1