[mythtv] [PATCH] Small contrib/myth.rebuilddatabase.pl fix
Scott RoLanD
scatterlined at mac.com
Fri Feb 18 09:15:42 UTC 2005
The script was failing to listen to your answers to the yes or no
questions. A simple mistake of not doing proper perl string
comparisons in the if test.
--
Scott Roland
-------------- next part --------------
Index: myth.rebuilddatabase.pl
===================================================================
RCS file: /var/lib/mythcvs/mythtv/contrib/myth.rebuilddatabase.pl,v
retrieving revision 1.5
diff -u -r1.5 myth.rebuilddatabase.pl
--- myth.rebuilddatabase.pl 20 Nov 2004 05:37:19 -0000 1.5
+++ myth.rebuilddatabase.pl 17 Feb 2005 17:02:39 -0000
@@ -298,7 +298,7 @@
print("Non-nuv file $show found.\n");
print("Do you want to import? (y/n): ");
chomp(my $do_import = <STDIN>);
- if ($do_import = "y") {
+ if ($do_import eq "y") {
print("Enter channel: ");
chomp(my $tmp_channel = <STDIN>);
if ($tmp_channel) {$channel = $tmp_channel;}
@@ -365,7 +365,7 @@
print("Building a seek table should improve FF/RW and JUMP functions when watching this video\n");
print("Do you want to build a seek table for this file? (y/n): ");
chomp(my $do_commflag = <STDIN>);
- if ($do_commflag = "y") {
+ if ($do_commflag eq "y") {
if (!$test_mode) {
exec("mythcommflag --file $new_file --rebuild");
} else {
More information about the mythtv-dev
mailing list