チェンジセット 79: trunk/install/perl/tvrecording.pl
- コミット日時:
- 2008/06/27 20:15:46 (17 年前)
- ファイル:
凡例:
- 変更無し
- 追加
- 削除
- 更新
- コピー
- 移動
trunk/install/perl/tvrecording.pl
r44 r79 307 307 # $outputfile .= "$ARGV[3]"; 308 308 # $outputfile .= `date +%Y%m%d-%H%M --date "1 min "`; 309 &writelog("tvrecording: DEBUG ARGV[ 2] ne null \$outputfile $outputfile ");309 &writelog("tvrecording: DEBUG ARGV[3] ne null \$outputfile $outputfile "); 310 310 311 311 }else{ … … 313 313 chomp($outputfile); 314 314 $outputfile .= ".m2p"; 315 &writelog("tvrecording: DEBUG ARGV[ 2] is null \$outputfile $outputfile ");315 &writelog("tvrecording: DEBUG ARGV[3] is null \$outputfile $outputfile "); 316 316 317 317 }