in mode=suggest, add a queue with convert_b25_ts if asked to move after dec/rec

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

diff --git a/rectool/trunk/rectool.pl b/rectool/trunk/rectool.pl
index d3e9ae1..ca661ee 100755 (executable)
--- a/rectool/trunk/rectool.pl
+++ b/rectool/trunk/rectool.pl
@@ -907,6 +907,9 @@ if ( $mode eq 'change' ) {
                $datetime_now = $datetime_now->add( minutes => 60 );
                my $end = $datetime_now->strftime( '%Y-%m-%d %H:%M:%S' );
 
+               # 録画後/解読後移動ならば、解読予約にオーバーライドする
+               $sql_type = 'convert_b25_ts' if ( $opt =~ /R|D/ );
+
                $dbh->do( 
                        "INSERT INTO timeline ( type, chtxt, title, btime, etime, opt ) 
                        VALUES ( '$sql_type', '$chtxt', '$title', '$begin', '$end', '$opt' )"