diff options
Diffstat (limited to 'audio/p5-CDDB/files/patch-aa')
-rw-r--r-- | audio/p5-CDDB/files/patch-aa | 42 |
1 files changed, 42 insertions, 0 deletions
diff --git a/audio/p5-CDDB/files/patch-aa b/audio/p5-CDDB/files/patch-aa new file mode 100644 index 000000000000..65cb6dfdf74d --- /dev/null +++ b/audio/p5-CDDB/files/patch-aa @@ -0,0 +1,42 @@ +--- CDDB.pm.orig Sun Apr 30 06:33:12 2000 ++++ CDDB.pm Mon Mar 12 15:11:35 2001 +@@ -15,9 +15,9 @@ + # list of known cddb servers + + my @cddb_hosts = +- ( [ 'cddb.cddb.com' => 8880 ], +- [ 'sj.ca.us.cddb.com' => 8880 ], +- [ 'sc.ca.us.cddb.com' => 8880 ], ++ ( [ 'freedb.freedb.org' => 8880 ], ++ [ 'ca.freedb.org' => 8880 ], ++ [ 'sk.freedb.org' => 8880 ], + ); + + #------------------------------------------------------------------------------ +@@ -177,7 +177,7 @@ + login => $login, + libname => 'CDDB.pm', + libver => $VERSION, +- cddbmail => 'cddb-test@submit.cddb.com', ++ cddbmail => 'freedb-submit@freedb.org', + debug => $debug, + host => $host, + port => $port, +@@ -615,7 +615,7 @@ + use CDDB; + + ### connect to the CDDB server +- my $cddb = new CDDB( Host => 'www.cddb.com', # default ++ my $cddb = new CDDB( Host => 'freedb.freedb.org', # default + Port => 8880, # default + Login => $login_id, # defaults to %ENV's + ) or die $!; +@@ -682,7 +682,7 @@ + protocol may require several separate connections (sometimes one per + query). + +-C<new> accepts these parameters: Host (defaults to www.cddb.com), Port ++C<new> accepts these parameters: Host (defaults to freedb.freedb.org), Port + (defaults to 8880), Login (defaults to your login ID), and Debug + (defaults to boolean false) parameters. + |