CVS commit: pkgsrc/audio/p5-Audio-Scan

["Thomas Klausner" <wiz%netbsd.org@localhost>]

Module Name:    pkgsrc
Committed By:   wiz
Date:           Mon Jul  7 07:01:07 UTC 2025

Modified Files:
        pkgsrc/audio/p5-Audio-Scan: distinfo
Added Files:
        pkgsrc/audio/p5-Audio-Scan/patches: patch-Scan.xs

Log Message:
p5-Audio-Scan: fix build with perl 5.42


To generate a diff of this commit:
cvs rdiff -u -r1.17 -r1.18 pkgsrc/audio/p5-Audio-Scan/distinfo
cvs rdiff -u -r0 -r1.1 pkgsrc/audio/p5-Audio-Scan/patches/patch-Scan.xs

Please note that diffs are not public domain; they are subject to the
copyright notices on the relevant files.

Modified files:

Index: pkgsrc/audio/p5-Audio-Scan/distinfo
diff -u pkgsrc/audio/p5-Audio-Scan/distinfo:1.17 pkgsrc/audio/p5-Audio-Scan/distinfo:1.18
--- pkgsrc/audio/p5-Audio-Scan/distinfo:1.17    Tue Oct 26 09:59:20 2021
+++ pkgsrc/audio/p5-Audio-Scan/distinfo Mon Jul  7 07:01:06 2025
@@ -1,5 +1,6 @@
-$NetBSD: distinfo,v 1.17 2021/10/26 09:59:20 nia Exp $
+$NetBSD: distinfo,v 1.18 2025/07/07 07:01:06 wiz Exp $
 
 BLAKE2s (Audio-Scan-1.01.tar.gz) = 499b62f496feff4e5104346729820d929583ae7474b6aa9c7fd4dc1a63ff628b
 SHA512 (Audio-Scan-1.01.tar.gz) = 07e97bd1bb2c469d07c27e20bf2f3067967e21658493de012fcc4c083a0a0c42e36d6d8d5ae8d6f80d8b447d11fdea1c024ee7f4c3f857e565335328238e2853
 Size (Audio-Scan-1.01.tar.gz) = 4827918 bytes
+SHA1 (patch-Scan.xs) = 3ae7fdf787c9050032b523ee2bfa285fa6faccb7

Added files:

Index: pkgsrc/audio/p5-Audio-Scan/patches/patch-Scan.xs
diff -u /dev/null pkgsrc/audio/p5-Audio-Scan/patches/patch-Scan.xs:1.1
--- /dev/null   Mon Jul  7 07:01:07 2025
+++ pkgsrc/audio/p5-Audio-Scan/patches/patch-Scan.xs    Mon Jul  7 07:01:07 2025
@@ -0,0 +1,61 @@
+$NetBSD: patch-Scan.xs,v 1.1 2025/07/07 07:01:07 wiz Exp $
+
+Fix compatibility with Perl 5.42.0
+https://rt.cpan.org/Public/Bug/Display.html?id=167903
+
+--- Scan.xs.orig       2025-07-07 06:58:32.291403812 +0000
++++ Scan.xs
+@@ -214,7 +214,7 @@ _generate_hash(const char *file)
+ MODULE = Audio::Scan          PACKAGE = Audio::Scan
+ 
+ HV *
+-_scan( char *, char *suffix, PerlIO *infile, SV *path, int filter, int md5_size, int md5_offset )
++_scan( char *a, char *suffix, PerlIO *infile, SV *path, int filter, int md5_size, int md5_offset )
+ CODE:
+ {
+   taghandler *hdl;
+@@ -266,7 +266,7 @@ OUTPUT:
+   RETVAL
+   
+ int
+-_find_frame( char *, char *suffix, PerlIO *infile, SV *path, int offset )
++_find_frame( char *a, char *suffix, PerlIO *infile, SV *path, int offset )
+ CODE:
+ {
+   taghandler *hdl;
+@@ -282,7 +282,7 @@ OUTPUT:
+   RETVAL
+ 
+ HV *
+-_find_frame_return_info( char *, char *suffix, PerlIO *infile, SV *path, int offset )
++_find_frame_return_info( char *a, char *suffix, PerlIO *infile, SV *path, int offset )
+ CODE:
+ {
+   taghandler *hdl = _get_taghandler(suffix);
+@@ -306,7 +306,7 @@ OUTPUT:
+   RETVAL
+ 
+ int
+-is_supported(char *, SV *path)
++is_supported(char *a, SV *path)
+ CODE:
+ {
+   char *suffix = strrchr( SvPVX(path), '.' );
+@@ -322,7 +322,7 @@ OUTPUT:
+   RETVAL
+ 
+ SV *
+-type_for(char *, SV *suffix)
++type_for(char *a, SV *suffix)
+ CODE:
+ {
+   taghandler *hdl = NULL;
+@@ -360,7 +360,7 @@ OUTPUT:
+   RETVAL
+ 
+ AV *
+-extensions_for(char *, SV *type)
++extensions_for(char *a, SV *type)
+ CODE:
+ {
+   int i, j;