- rediff patches

diff --git a/perl-Audio-nas-fix.patch b/perl-Audio-nas-fix.patch
index 55f4594c7db4d9e1a79c811847d08fd1c1212483..45e3620334c81b6a0f2e7eaf91ab2310de25fc80 100644 (file)
--- a/perl-Audio-nas-fix.patch
+++ b/perl-Audio-nas-fix.patch
@@ -1,16 +1,7 @@
---- Audio-0.005/Play/Net/Net.xs.orig   Wed Aug  4 19:03:49 1999
-+++ Audio-0.005/Play/Net/Net.xs        Sun Aug  4 11:07:20 2002
-@@ -67,6 +67,7 @@
-  int priv = 0;
-  AuEvent ev;
-  STRLEN samp = Audio_samples(au);
-+ STRLEN na;
-  Sound s = SoundCreate(SoundFileFormatNone,
-                        little_endian ? AuFormatLinearSigned16LSB : AuFormatLinearSigned16MSB,
-                        1, au->rate, samp, SvPV(au->comment,na)); 
---- Audio-0.005/Play/Net/Makefile.PL.orig      Wed Aug  4 19:03:49 1999
-+++ Audio-0.005/Play/Net/Makefile.PL   Sun Aug  4 11:59:39 2002
-@@ -18,7 +18,7 @@
+diff -urNp -x '*.orig' Audio-1.029.org/Play/Net/Makefile.PL Audio-1.029/Play/Net/Makefile.PL
+--- Audio-1.029.org/Play/Net/Makefile.PL       2003-08-05 21:18:56.000000000 +0200
++++ Audio-1.029/Play/Net/Makefile.PL   2021-05-07 23:13:40.859600570 +0200
+@@ -18,7 +18,7 @@ if (try_compile("-c ../config/Net.c"))
   {
    WriteMakefile(
        'NAME'     => 'Audio::Play::Net',
@@ -19,3 +10,14 @@
        'INC'      => q[-I/usr/X11R6/include],
        'clean'    => {FILES => "*% *.bak"},
        'OBJECT'   => '$(O_FILES)',
+diff -urNp -x '*.orig' Audio-1.029.org/Play/Net/Net.xs Audio-1.029/Play/Net/Net.xs
+--- Audio-1.029.org/Play/Net/Net.xs    2003-08-05 21:18:56.000000000 +0200
++++ Audio-1.029/Play/Net/Net.xs        2021-05-07 23:13:40.859600570 +0200
+@@ -67,6 +67,7 @@ AuPlay(AuServer *aud, Audio *au, float v
+  int priv = 0;
+  AuEvent ev;
+  STRLEN samp = Audio_samples(au);
++ STRLEN na;
+  Sound s = SoundCreate(SoundFileFormatNone,
+                        little_endian ? AuFormatLinearSigned16LSB : AuFormatLinearSigned16MSB,
+                        1, au->rate, samp, SvPV_nolen(au->comment)); 

diff --git a/perl-Audio-perl_version.patch b/perl-Audio-perl_version.patch
index e710c2d729a0e560e53cd972f91698191d1074e1..80a65f85bfc68c9717ce0f7c384859318877354b 100644 (file)
--- a/perl-Audio-perl_version.patch
+++ b/perl-Audio-perl_version.patch
@@ -1,16 +1,18 @@
---- Audio-0.005/Data/Data.pm.orig      Sun Aug  4 21:29:03 2002
-+++ Audio-0.005/Data/Data.pm   Sun Aug  4 21:29:21 2002
-@@ -1,7 +1,7 @@
- package Audio::Data;
+diff -urNp -x '*.orig' Audio-1.029.org/Data/Data.pm Audio-1.029/Data/Data.pm
+--- Audio-1.029.org/Data/Data.pm       2004-06-02 20:46:25.000000000 +0200
++++ Audio-1.029/Data/Data.pm   2021-05-07 23:13:40.926268154 +0200
+@@ -7,7 +7,7 @@ our @EXPORT_OK = qw(solve_polynomial);
+ sub solve_polynomial;
  
  # PerlIO calls used in .xs code
 -require 5.00302;
 +require 5.003_02;  
  
- require DynaLoader;
- @ISA = qw(DynaLoader);
---- Audio-0.005/Play/Net/Net.pm.orig   Sun Aug  4 21:38:01 2002
-+++ Audio-0.005/Play/Net/Net.pm        Sun Aug  4 21:38:05 2002
+ use XSLoader;
+ our $VERSION = sprintf '1.%03d', (q$Revision: #14 $ =~ /\D(\d+)\s*$/)[0] + 15;
+diff -urNp -x '*.orig' Audio-1.029.org/Play/Net/Net.pm Audio-1.029/Play/Net/Net.pm
+--- Audio-1.029.org/Play/Net/Net.pm    2003-08-05 21:18:56.000000000 +0200
++++ Audio-1.029/Play/Net/Net.pm        2021-05-07 23:13:40.926268154 +0200
 @@ -1,6 +1,6 @@
  package Audio::Play::Net;
  # PerlIO calls used in .xs code