summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorIvan Kohler <ivan@freeside.biz>2015-06-17 14:39:39 -0700
committerIvan Kohler <ivan@freeside.biz>2015-06-17 14:39:39 -0700
commitabd722a1848ff5483f80cd6c8ccc12b6bde26b38 (patch)
tree2546094925c2239b002553b4afc6e8c54462d90a
parentebd89c7672e0bf5150fe1c2f89c2f88b90304e8d (diff)
fix new page logging
-rw-r--r--FS/FS/Mason.pm2
-rw-r--r--FS/FS/Mason/Request.pm3
-rw-r--r--htetc/handler.pl3
3 files changed, 5 insertions, 3 deletions
diff --git a/FS/FS/Mason.pm b/FS/FS/Mason.pm
index d0a530e9a..252bf192a 100644
--- a/FS/FS/Mason.pm
+++ b/FS/FS/Mason.pm
@@ -377,6 +377,7 @@ if ( -e $addl_handler_use_file ) {
use FS::legacy_cust_history;
use FS::quotation_pkg_tax;
use FS::cust_pkg_reason_fee;
+ use FS::access_user_log;
# Sammath Naur
if ( $FS::Mason::addl_handler_use ) {
@@ -435,6 +436,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 36c46dc41..66c69f6ea 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 = '';
@@ -118,6 +119,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 f41a3df70..dbe3c9170 100644
--- a/htetc/handler.pl
+++ b/htetc/handler.pl
@@ -6,7 +6,6 @@ use strict;
use warnings;
use FS::Mason qw( mason_interps );
use FS::Trace;
-use FS::access_user_log;
if ( %%%RT_ENABLED%%% ) {
@@ -136,8 +135,6 @@ sub handler
}
- FS::access_user_log->insert_new_path( $r->uri );
-
FS::Trace->log('handling request');
my %session;
my $status;