55 lines
2.0 KiB
Plaintext
55 lines
2.0 KiB
Plaintext
$OpenBSD: patch-get_iplayer,v 1.19 2009/09/27 23:47:15 sthen Exp $
|
|
|
|
- default to using id3tag not id3v2
|
|
- follow hier(7) not Linux FHS for options file location
|
|
|
|
--- get_iplayer.orig Sat Sep 26 10:14:59 2009
|
|
+++ get_iplayer Mon Sep 28 00:36:57 2009
|
|
@@ -304,10 +304,7 @@ if ( defined $ENV{GETIPLAYERUSERPREFS} && $ENV{GETIPLA
|
|
# Options on unix-like systems
|
|
} elsif ( defined $ENV{HOME} ) {
|
|
$profile_dir = $opt_pre->{profiledir} || $ENV{HOME}.'/.get_iplayer';
|
|
- $optfile_system = '/var/lib/get_iplayer/options';
|
|
- if ( -f '/etc/get_iplayer/options' ) {
|
|
- logger "WARNING: System-wide options in /etc/get_iplayer/options are now ignored, please use /var/lib/get_iplayer/options instead\n";
|
|
- }
|
|
+ $optfile_system = '${SYSCONFDIR}/get_iplayer/options';
|
|
# Otherwise look for windows style file locations
|
|
} elsif ( defined $ENV{USERPROFILE} ) {
|
|
$profile_dir = $opt_pre->{profiledir} || $ENV{USERPROFILE}.'/.get_iplayer';
|
|
@@ -318,7 +315,7 @@ mkpath $profile_dir if ! -d $profile_dir;
|
|
|
|
|
|
# get list of additional user plugins and load plugin
|
|
-my $plugin_dir_system = '/usr/share/get_iplayer/plugins';
|
|
+my $plugin_dir_system = '${TRUEPREFIX}/share/get_iplayer/plugins';
|
|
my $plugin_dir_user = "$profile_dir/plugins";
|
|
for my $plugin_dir ( ( $plugin_dir_user, $plugin_dir_system ) ) {
|
|
if ( opendir( DIR, $plugin_dir ) ) {
|
|
@@ -439,6 +436,7 @@ if ( ! keys %plugin_files ) {
|
|
$opt->{pluginsupdate} = 1;
|
|
}
|
|
# Update this script if required
|
|
+$opt->{packagemanager}='disable';
|
|
update_script() if $opt->{update} || $opt->{pluginsupdate};
|
|
|
|
|
|
@@ -632,7 +630,7 @@ sub find_matches {
|
|
$bin->{vlc} = $opt->{vlc} || 'cvlc';
|
|
push @{ $binopts->{vlc} }, '-vv' if $opt->{debug};
|
|
|
|
- $bin->{id3v2} = $opt->{id3v2} || 'id3v2';
|
|
+ $bin->{id3v2} = $opt->{id3v2} || 'id3tag';
|
|
|
|
$bin->{tee} = 'tee';
|
|
|
|
@@ -5182,7 +5180,7 @@ sub optional_list_entry_format {
|
|
# Returns the modes to try for this prog type
|
|
sub modelist {
|
|
my $prog = shift;
|
|
- my $mlist = $opt->{tvmode} || $opt->{modes};
|
|
+ my $mlist = $opt->{tvmode} || $opt->{vmode} || $opt->{modes};
|
|
|
|
# Defaults
|
|
if ( ! $mlist ) {
|