lots of stuff expects the request object to have a hostname method. g…

…ive it one.
plainblack · Jun 19, 2012 · 851844c · 851844c
1 parent 225df67
commit 851844c
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 0 deletions.
diff --git a/docs/changelog/7.x.x.txt b/docs/changelog/7.x.x.txt
@@ -1,4 +1,5 @@
 7.10.25
+ - added: give WebGUI::PseudoRequest a hostname method
  - fixed: don't clobber the request handler if WebGUI::Test was loaded inside of mod_perl
  - fixed #12365: editing a metadata may cause a fatal error (Arjan Widlak / United Knowledge)
  - fixed #12346: toVersion in upgrade_7.9.34-7.10.22.pl was "0.0.0"

diff --git a/t/lib/WebGUI/PseudoRequest.pm b/t/lib/WebGUI/PseudoRequest.pm
@@ -73,6 +73,8 @@ sub new {
 	return $self;
 }
 
+sub hostname { 'localhost' }
+
 #----------------------------------------------------------------------------
 
 =head2 body ( [$value])