From 825da272c3b2e89b86e19656ade350240204896b Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Fri, 22 Oct 1999 16:58:56 +0000
Subject: no_comment

---
 perl-install/c/stuff.xs.pm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'perl-install/c/stuff.xs.pm')

diff --git a/perl-install/c/stuff.xs.pm b/perl-install/c/stuff.xs.pm
index 2b301d1b0..12bdc913c 100644
--- a/perl-install/c/stuff.xs.pm
+++ b/perl-install/c/stuff.xs.pm
@@ -17,6 +17,7 @@ print '
 #include <linux/fs.h>
 #include <linux/hdreg.h>
 #include <linux/vt.h>
+#include <linux/cdrom.h>
 #include <net/if.h>
 #include <net/route.h>
 
@@ -549,7 +550,7 @@ headerGetEntry_string_list(h, query)
   [ qw(int S_IFCHR S_IFBLK KDSKBENT KT_SPEC NR_KEYS MAX_NR_KEYMAPS BLKRRPART TIOCSCTTY
        HDIO_GETGEO BLKGETSIZE
        MS_MGC_VAL MS_RDONLY O_NONBLOCK SECTORSIZE WNOHANG
-       VT_ACTIVATE VT_WAITACTIVE VT_GETSTATE
+       VT_ACTIVATE VT_WAITACTIVE VT_GETSTATE CDROM_LOCKDOOR
        ) ],
 );
 push @macros, [ qw(int RPMTAG_NAME RPMTAG_GROUP RPMTAG_SIZE RPMTAG_VERSION RPMTAG_SUMMARY RPMTAG_DESCRIPTION RPMTAG_RELEASE RPMTAG_ARCH RPMTAG_FILENAMES RPMTAG_OBSOLETES) ]
-- 
cgit v1.2.1