チェンジセット 110: trunk/install/perl

差分発生行の前後
無視リスト:
コミット日時:
2010/08/05 20:21:11 (14 年前)
コミッタ:
sorshi
ログメッセージ:

チューナーに空きがないときに、確認するデバイスにPT1/PT2が含まれていなかったことを修正。

foltiaBBSの
「もうすぐ終了する番組のプロセスをkill
投稿日 2010年08月05日03時19分33秒 投稿者 Nis」から

ファイル:

凡例:

変更無し
追加
削除
更新
コピー
移動
  • trunk/install/perl/recwrap.pl

    r97 r110  
    220220    my $now = time() + 60 * 2; 
    221221&writelog("recwrap DEBUG continuousrecordingcheck() now $now"); 
    222 my @processes =`ps ax | grep recfriio`; 
     222my @processes =`ps ax | grep -e recpt1 -e recfriio`; #foltiaBBS もうすぐ終了する番組のプロセスをkill 投稿日 2010年08月05日03時19分33秒 投稿者 Nis  
    223223 
    224224my $psline = ""; 
     
    228228my $sth; 
    229229foreach (@processes){ 
    230         if (/friiodetect/) { 
     230        if (/recpt1|friiodetect/) { 
    231231                if (/^.[0-9]*\s/){ 
    232232                        push(@pid, $&); 
track feed