perl-device-usb: New package

Signed-off-by: Marcel Denia <naoir@gmx.net>
This commit is contained in:
Marcel Denia
2015-09-10 16:12:35 +02:00
parent 13292808a3
commit 3cedc1aa87
7 changed files with 378 additions and 0 deletions

View File

@@ -0,0 +1,13 @@
--- a/lib/Device/USB.pm
+++ b/lib/Device/USB.pm
@@ -9,8 +9,8 @@ use Inline (
C => "DATA",
($ENV{LIBUSB_LIBDIR}
? ( LIBS => "-L\"$ENV{LIBUSB_LIBDIR}\" " .
- ($^O eq 'MSWin32' ? ' -llibusb -L\"$ENV{WINDDK}\\lib\\crt\\i386\" -lmsvcrt ' : '-lusb') )
- : ( LIBS => '-lusb', )
+ ($^O eq 'MSWin32' ? ' -llibusb -L\"$ENV{WINDDK}\\lib\\crt\\i386\" -lmsvcrt ' : '-lusb-0.1') )
+ : ( LIBS => '-lusb-0.1', )
),
($ENV{LIBUSB_INCDIR} ? ( INC => "-I\"$ENV{LIBUSB_INCDIR}\"" ) : () ),
NAME => 'Device::USB',