チェンジセット 112: trunk/install/perl/folprep.pl

コミット日時:

2010/08/23 00:10:13 (15 年前)

コミッタ:

sorshi

ログメッセージ:

・ラジオ局録音の場合はepgimport実行しないように修正

ファイル:

• trunk/install/perl/folprep.pl (更新) (1 diff)

trunk/install/perl/folprep.pl

@@ -41 +41 @@
-
-my $stationid = "";
-
+#EPG録画/キーワード録画
-        #EPG更新 & DB更新
-        $dbh = DBI->connect($DSN,$DBUser,$DBPass) ||die $DBI::error;;
-        $stationid = &pid2sid($pid);
+        &writelog("folprep DEBUG epgimport.pl $stationid");
-        system("$toolpath/perl/epgimport.pl $stationid");
-
+#しょぼかる録画
-        #XMLゲット & DB更新
+        &writelog("folprep DEBUG getxml2db.pl");
-        system("$toolpath/perl/getxml2db.pl");
-}