correct package for $r

diff --git a/htetc/handler.pl b/htetc/handler.pl
index e37f3cb..33f9c48 100644 (file)
--- a/htetc/handler.pl
+++ b/htetc/handler.pl
@@ -209,7 +209,7 @@ sub handler
 
       };
       
-      unless ( $r->filename =~ /\/rt\/.*NoAuth/ ) { #RT
+      unless ( $HTML::Mason::r->filename =~ /\/rt\/.*NoAuth/ ) { #RT
         $cgi = new CGI;
         &cgisuidsetup($cgi);
         #&cgisuidsetup($r);