1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
|
diff -Naur dvdrip-0.98.11.orig/lib/Video/DVDRip/Config.pm dvdrip-0.98.11/lib/Video/DVDRip/Config.pm
--- dvdrip-0.98.11.orig/lib/Video/DVDRip/Config.pm 2009-02-28 16:28:00.000000000 -0200
+++ dvdrip-0.98.11/lib/Video/DVDRip/Config.pm 2012-05-15 15:41:34.554118050 -0300
@@ -233,13 +233,6 @@
],
rules => "executable-command",
},
- rar_command => {
- label => __ "rar command (for vobsub compression)",
- type => 'string',
- value => 'rar',
- presets => [ 'rar', ],
- rules => "executable-command",
- },
base_project_dir => {
label => __ "Default data base directory",
type => 'dir',
@@ -355,7 +348,6 @@
__ "Commands" => [
qw(
play_dvd_command play_file_command
- play_stdin_command rar_command
)
],
__ "Cluster options" => [
@@ -907,7 +899,6 @@
sub test_play_dvd_command { _executable(@_) }
sub test_play_file_command { _executable(@_) }
sub test_play_stdin_command { _executable(@_) }
-sub test_rar_command { _executable(@_) }
sub test_dvd_device { _exists(@_) }
sub test_writer_device { _exists(@_) }
sub test_base_project_dir { _abs_and_writable(@_) }
diff -Naur dvdrip-0.98.11.orig/lib/Video/DVDRip/Depend.pm dvdrip-0.98.11/lib/Video/DVDRip/Depend.pm
--- dvdrip-0.98.11.orig/lib/Video/DVDRip/Depend.pm 2009-02-28 16:28:00.000000000 -0200
+++ dvdrip-0.98.11/lib/Video/DVDRip/Depend.pm 2012-05-15 15:30:13.506056523 -0300
@@ -171,22 +171,6 @@
min => "0.15",
suggested => "0.15",
},
- rar => {
- order => ++$ORDER,
- command => Video::DVDRip::Depend->config('rar_command'),
- comment => __ "Needed for compressed vobsub subtitles",
- optional => 1,
- version_cmd => "",
- get_version => sub {
- my $cmd = Video::DVDRip::Depend->config('rar_command')." '-?'";
- qx[$cmd 2>&1] =~ /rar\s+(\d+\.\d+(\.\d+)?)/i;
- return $1;
- },
- convert => 'default',
- min => "2.71",
- max => "2.99",
- suggested => "2.71",
- },
mplayer => {
order => ++$ORDER,
command => "mplayer",
@@ -284,21 +268,6 @@
min => "2.2",
suggested => "2.4",
},
- hal => {
- order => ++$ORDER,
- command => "lshal",
- comment => __"Used for DVD device scanning",
- optional => 1,
- version_cmd => "lshal -v",
- get_version => sub {
- my ($cmd) = @_;
- qx[$cmd 2>&1] =~ /version\s+(\d+\.\d+(\.\d+)?)/i;
- return $1;
- },
- convert => 'default',
- min => "0.5",
- suggested => "0.5.7",
- },
);
sub convert_default {
|