Fix syntax error
authorJeff Godin <jgodin@tadl.org>
Fri, 9 Aug 2013 15:14:35 +0000 (11:14 -0400)
committerJeff Godin <jgodin@tadl.org>
Fri, 9 Aug 2013 15:14:35 +0000 (11:14 -0400)
Fix syntax error: ~= != =~

Signed-off-by: Jeff Godin <jgodin@tadl.org>
iNCIPit.cgi

index d698ec3..3358fb1 100644 (file)
@@ -41,7 +41,7 @@ my $U = "OpenILS::Application::AppUtils";
 my $conf = load_config( 'iNCIPit.ini' );
 
 # reject non-https access unless configured otherwise
-unless ($conf->{access}->{permit_plaintext} ~= m/^yes$/i) {
+unless ($conf->{access}->{permit_plaintext} =~ m/^yes$/i) {
     unless ($ENV{HTTPS} eq 'on') {
         print "Content-type: text/plain\n\n";
         print "Access denied.\n";