[COMMIT LOGREPORT] service/www/lib/tests ReferrerCategoriserTest.pm,1.1,1.2

[Francis J. Lacoste]

Update of /cvsroot/logreport/service/www/lib/tests
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv27855/www/lib/tests

Modified Files:
	ReferrerCategoriserTest.pm 
Log Message:
Added referring_page field.


Index: ReferrerCategoriserTest.pm
===================================================================
RCS file: /cvsroot/logreport/service/www/lib/tests/ReferrerCategoriserTest.pm,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -r1.1 -r1.2
--- ReferrerCategoriserTest.pm	24 May 2004 16:09:42 -0000	1.1
+++ ReferrerCategoriserTest.pm	29 Jul 2005 20:53:39 -0000	1.2
@@ -54,6 +54,12 @@
     $self->assert_str_equals( 'Google', $dlf->{'search_engine'} );
     $self->assert_null(  $dlf->{'keywords'} );
 
+    $dlf->{'referer'} = 'http://www.contre.com/home.html?this+is+it';
+    $analyser->categorise( $dlf );
+    $self->assert_str_equals( 'www.contre.com', $dlf->{'referring_site'} );
+    $self->assert_str_equals( '/home.html', $dlf->{'referring_page'} );
+    $self->assert_null(  $dlf->{'keywords'} );
+
     return;
 }
 

-- 
To UNSUBSCRIBE, email to commit-request at logreport.org with a subject of 
"unsubscribe". Trouble? Send an email with subject "help" to 
commit-request at logreport.org