diff options
author | Kay Sievers <kay.sievers@suse.de> | 2006-09-05 14:00:47 +0200 |
---|---|---|
committer | Kay Sievers <kay.sievers@suse.de> | 2006-09-05 14:00:47 +0200 |
commit | d60fd52af868ec6043d9a6dc641a6a64feabd238 (patch) | |
tree | b8d18d00cf580d512e487d16c7a2f3a4ee88232c /extras | |
parent | 492e76c9c1108a28eae356cc8bd7955ccf234980 (diff) |
remove broken name_cdrom.pl
We never get an event on media change, so this script can't work.
Diffstat (limited to 'extras')
-rwxr-xr-x | extras/name_cdrom.pl | 31 |
1 files changed, 0 insertions, 31 deletions
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; |