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 {