[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