Index: trunk/doc/CHANGES.txt
===================================================================
--- trunk/doc/CHANGES.txt (リビジョン 76)
+++ trunk/doc/CHANGES.txt (リビジョン 77)
@@ -1,3 +1,8 @@
 foltia 更新履歴 http://www.dcc-jpl.com/soft/foltia/
+
+08.3.17
+m.php
+　環境ポリシー対応が不十分だったところを修正。
+
 08.3.14
 deletemovie.php:
Index: trunk/install/php/m.php
===================================================================
--- trunk/install/php/m.php (リビジョン 75)
+++ trunk/install/php/m.php (リビジョン 77)
@@ -142,19 +142,25 @@
 if ($demomode){
 }else{
-
-$query = "
-insert into foltia_subtitle  
-values ( '$insertpid','0','$recstid',
-	'$nextcno','$pname','$startdatetime','$enddatetime','0' ,'$lengthmin')";
-
-	$rs = m_query($con, $query, "DBクエリに失敗しました");
-
-//addatq.pl
-//キュー入れプログラムをキック
-//引数　TID チャンネルID
-//echo("$toolpath/perl/addatq.pl $tid $station");
-
-	$oserr = system("$toolpath/perl/addatq.pl 0 0");
-
+	$userclass = getuserclass($con);
+	if ( $userclass <= 2){
+	$memberid = getmymemberid($con);
+	
+	$query = "
+	insert into foltia_subtitle  (pid ,tid ,stationid , countno ,subtitle ,
+startdatetime ,enddatetime ,startoffset , lengthmin , epgaddedby )  
+	values ( '$insertpid','0','$recstid',
+		'$nextcno','$pname','$startdatetime','$enddatetime','0' ,'$lengthmin', '$memberid')";
+	
+		$rs = m_query($con, $query, "DBクエリに失敗しました");
+	
+	//addatq.pl
+	//キュー入れプログラムをキック
+	//引数　TID チャンネルID
+	//echo("$toolpath/perl/addatq.pl $tid $station");
+	
+		$oserr = system("$toolpath/perl/addatq.pl 0 0");
+	}else{
+		print "EPG予約を行う権限がありません。";
+	}// end if $userclass <= 2
 }//end if demomode
 
@@ -247,5 +253,5 @@
     <input name="pname" type="text" id="pname" value="<?=$pname ?>" />
   </p>
-<!- <p  style='background-color: #DDDDFF'>
+<!-- <p  style='background-color: #DDDDFF'>
 繰り返し指定-毎週以下の曜日に録画:
 <input name="weeklyloop" type="radio" value="128" />  日曜　
@@ -257,5 +263,5 @@
 <input name="weeklyloop" type="radio" value="2" />  土曜　
  </p>
- ->
+ -->
 <input type="submit" value="予約">　
 </form>