X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=FS%2FFS%2FMason%2FStandaloneRequest.pm;h=e34a35310720b3210a32aa777a13c86885387b1d;hp=a5e4dcb2a6cd0dcfe4d118f0d78ff99402c6413a;hb=cb6214a6c0b0ecc8c3a5c264ee98ff3f301c33a6;hpb=bc34518143fe485eec412e709271e681a1e41aac

diff --git a/FS/FS/Mason/StandaloneRequest.pm b/FS/FS/Mason/StandaloneRequest.pm
index a5e4dcb2a..e34a35310 100644
--- a/FS/FS/Mason/StandaloneRequest.pm
+++ b/FS/FS/Mason/StandaloneRequest.pm
@@ -20,4 +20,13 @@ sub new {
 
 }
 
+# fake this up for UI testing
+sub redirect {
+  my $self = shift;
+  if (scalar(@_)) {
+    $self->{_redirect} = shift;
+  }
+  return $self->{_redirect};
+}
+
 1;