チェンジセット 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 (更新) (2 diffs)

trunk/install/perl/recwrap.pl

@@ -220 +220 @@
-    my $now = time() + 60 * 2;
-&writelog("recwrap DEBUG continuousrecordingcheck() now $now");
-recfriio`;
+-e recpt1 -e recfriio`; #foltiaBBS もうすぐ終了する番組のプロセスをkill 投稿日 2010年08月05日03時19分33秒 投稿者 Nis 
-
-my $psline = "";
@@ -228 +228 @@
-my $sth;
-foreach (@processes){
-
+recpt1|
-                if (/^.[0-9]*\s/){
-                        push(@pid, $&);