From: Ivan Kohler <ivan@freeside.biz>
Date: Wed, 17 Jun 2015 21:39:29 +0000 (-0700)
Subject: fix new page logging
X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=commitdiff_plain;h=aaeaf74ce3d3ceb731633a054d56a7f916ff2721

fix new page logging
---

diff --git a/FS/FS/Mason.pm b/FS/FS/Mason.pm
index 78779d78a..6163197fa 100644
--- a/FS/FS/Mason.pm
+++ b/FS/FS/Mason.pm
@@ -402,6 +402,7 @@ if ( -e $addl_handler_use_file ) {
   use FS::quotation_pkg_tax;
   use FS::cust_pkg_reason_fee;
   use FS::part_svc_link;
+  use FS::access_user_log;
   # Sammath Naur
 
   if ( $FS::Mason::addl_handler_use ) {
@@ -460,6 +461,7 @@ if ( -e $addl_handler_use_file ) {
     die $@ if $@;
   }
 
+  no warnings 'redefine';
   *CGI::redirect = sub {
     my $self = shift;
     my $cookie = '';
diff --git a/FS/FS/Mason/Request.pm b/FS/FS/Mason/Request.pm
index 5d6fc4cd4..62bf670b9 100644
--- a/FS/FS/Mason/Request.pm
+++ b/FS/FS/Mason/Request.pm
@@ -5,6 +5,7 @@ use warnings;
 use vars qw( $FSURL $QUERY_STRING );
 use base 'HTML::Mason::Request';
 use FS::Trace;
+use FS::access_user_log;
 
 $FSURL = 'http://Set/FS_Mason_Request_FSURL/in_standalone_mode/';
 $QUERY_STRING = '';
@@ -119,6 +120,8 @@ sub freeside_setup {
 
     }
 
+    FS::access_user_log->insert_new_path( $filename );
+
     FS::Trace->log('    done');
 
 }
diff --git a/htetc/handler.pl b/htetc/handler.pl
index 45afafbec..416ea69c4 100644
--- a/htetc/handler.pl
+++ b/htetc/handler.pl
@@ -7,7 +7,6 @@ use warnings;
 use FS::Mason qw( mason_interps );
 use FS::Trace;
 use FS::Conf;
-use FS::access_user_log;
 
 $FS::Conf::conf_cache_enabled = 1; # enable FS::Conf caching for performance
 
@@ -139,8 +138,6 @@ sub handler
 
     }
 
-    FS::access_user_log->insert_new_path( $r->uri );
-
     FS::Trace->log('handling request');
     my %session;
     my $status;