optimize Reports->Customers->List Customers, RT#20173

[freeside.git] / FS / FS / access_user.pm

diff --git a/FS/FS/access_user.pm b/FS/FS/access_user.pm
index ffbe7ac..761f592 100644 (file)
--- a/FS/FS/access_user.pm
+++ b/FS/FS/access_user.pm
@@ -748,6 +748,17 @@ sub sched_item {
   qsearch( 'sched_item', { 'usernum' => $self->usernum } );
 }
 
+=item locale
+
+=cut
+
+sub locale {
+  my $self = shift;
+  return $self->{_locale} if exists($self->{_locale});
+warn "access_user->locale called\n";
+  $self->{_locale} = $self->option('locale');
+}
+
 =back
 
 =head1 BUGS