Subversion Repositories VORC

Rev

Rev 247 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 247 Rev 251
Line 39... Line 39...
39 
error ("This is a numeric range question (it doesn't have comments as answers).") unless $type eq "text";
 39 
error ("This is a numeric range question (it doesn't have comments as answers).") unless $type eq "text";
40 
# Check to make sure just-a-coach isn't looking at private comments
 40 
# Check to make sure just-a-coach isn't looking at private comments
41 
error ("You don't have access to view these comments.") unless !$private or $LVL >= RollerCon::ADMIN or $ORCUSER->{department}->{MVP} >= RollerCon::LEAD;
 41 
error ("You don't have access to view these comments.") unless !$private or $LVL >= RollerCon::ADMIN or $ORCUSER->{department}->{MVP} >= RollerCon::LEAD;
Line 42... Line 42...
42 
 
 42 
 
43 
my ($started) = $dbh->selectrow_array ("select id from v_class_signup_new where id = ? and concat_ws(date, end_time) < date_sub(now(), interval 2 hour)", undef, $classid);
 43 
my ($started) = $dbh->selectrow_array ("select id from v_class_signup_new where id = ? and concat_ws(date, end_time) < date_sub(now(), interval 2 hour)", undef, $classid);
Line 44... Line 44...
44 
error ("Feedback isn't availabel until after the class has ended.") unless $started;
 44 
error ("Feedback isn't available until after the class has ended.") unless $started;