From d60fd52af868ec6043d9a6dc641a6a64feabd238 Mon Sep 17 00:00:00 2001
From: Kay Sievers <kay.sievers@suse.de>
Date: Tue, 5 Sep 2006 14:00:47 +0200
Subject: remove broken name_cdrom.pl

We never get an event on media change, so this script can't work.
---
 extras/name_cdrom.pl | 31 -------------------------------
 1 file changed, 31 deletions(-)
 delete mode 100755 extras/name_cdrom.pl

(limited to 'extras')

diff --git a/extras/name_cdrom.pl b/extras/name_cdrom.pl
deleted file mode 100755
index 28d2d29a3d..0000000000
--- a/extras/name_cdrom.pl
+++ /dev/null
@@ -1,31 +0,0 @@
-#!/usr/bin/perl
-
-# Horrible but funny script that shows how flexible udev can really be
-# This is to be executed by udev with the following rule:
-#   KERNEL="hd*[!0-9]|sr*", PROGRAM="name_cdrom.pl $tempnode", SYMLINK+="%c"
-
-use strict;
-use warnings;
-
-use CDDB_get qw(get_cddb);
-
-# following variables just need to be declared if different from defaults
-my %config;
-$config{'CDDB_HOST'} = "freedb.freedb.org";	# set cddb host
-$config{'CDDB_PORT'} = 8880;			# set cddb port
-$config{'CDDB_MODE'} = "cddb";			# set cddb mode: cddb or http
-$config{'CD_DEVICE'} = $ARGV[0];		# set cd device
-$config{'input'} = 0; 				# no user interaction
-
-my %cd = get_cddb(\%config);
-
-if (!defined $cd{title}) {
-	exit 1;
-}
-
-# print out our cd name
-$cd{artist} =~ s/ /_/g;
-$cd{title} =~ s/ /_/g;
-print "$cd{artist}-$cd{title}\n";
-
-exit 0;
-- 
cgit v1.2.3-54-g00ecf