tunerec: fix pointer calculation

[rec10/rec10-git.git] / rectool / rectool.pl

diff --git a/rectool/rectool.pl b/rectool/rectool.pl
old mode 100755 (executable)
new mode 100644 (file)
index d117091..5cdd541
--- a/rectool/rectool.pl
+++ b/rectool/rectool.pl
@@ -41,7 +41,7 @@ use XML::TreePP;
 ################ バージョン定義 ################
 
 
-my $rectool_version = 102;
+my $rectool_version = 103;
 
 
 ################ 初期化ここから ################
@@ -962,6 +962,7 @@ if ( $mode eq 'change' ) {
        }
        if ( $mode_sub eq 'classify' )
        {
+               $dbh->do( "UPDATE auto_classify SET do = FALSE" );
                if ( @id ) {
                        foreach my $id ( @id ) {
                                $dbh->do( "UPDATE auto_classify SET do = TRUE WHERE id = '$id'" );