doc fix; be a little less noisy

[catagits/Test-WWW-Selenium-Catalyst.git] / lib / Test / WWW / Selenium / Catalyst.pm

diff --git a/lib/Test/WWW/Selenium/Catalyst.pm b/lib/Test/WWW/Selenium/Catalyst.pm
index 3edf014..007f21d 100644 (file)
--- a/lib/Test/WWW/Selenium/Catalyst.pm
+++ b/lib/Test/WWW/Selenium/Catalyst.pm
@@ -19,12 +19,27 @@ my $app_pid; # pid of myapp server
 
 =head1 NAME
 
-Test::WWW::Selenium::Catalyst - Test your Catalyst app with Selenium
+Test::WWW::Selenium::Catalyst - Test your Catalyst application with Selenium
 
 =cut
 
 our $VERSION = '0.00_01';
 
+=head1 DEVELOPER RELEASE
+
+This is a developer release.  It's working for me in production, but
+it depends on a Java application (SeleniumRC), which can be
+unreliable.  On my Debian system, I had to put C<firefox-bin> in my
+path, and add C</usr/lib/firefox> to C<LD_LIBRARY_PATH>.  Every distro
+and OS is different, so I'd like some feedback on how this works on
+your system.  I would like to find a clean solution that lets this
+module "Just Work" for everyone, but I have a feeling that it's going
+to look more like C<if(gentoo){ ... } elsif (debian) { ... }> and so
+on.  I can live with that, but I need your help to get to that stage!
+
+Please report any problems to RT, the Catalyst mailing list, or the
+#catalyst IRC channel on L<irc.perl.org>.  Thanks!
+
 =head1 SYNOPSIS
 
     use Test::WWW::Selenium::Catalyst 'MyApp';
@@ -34,6 +49,11 @@ our $VERSION = '0.00_01';
     $sel->open_ok('/');
     $sel->is_text_present_ok('Welcome to MyApp');
 
+This module starts the SeleniumRC server and your Catalyst app so that
+you can test it with SeleniumRC.  Once you've called
+C<< Test::WWW::Selenium::Catalyst->start >>, everything is just like
+L<Test::WWW::Selenium|Test::WWW:Selenium>.
+
 =head1 FUNCTIONS
 
 =head2 start
@@ -60,7 +80,7 @@ sub _start_server {
     my $pid;
     if(0 == ($pid = fork())){
        local $SIG{TERM} = sub {
-           diag("Selenium server $$ going down (TERM)");
+           diag("Selenium server $$ going down (TERM)") if $DEBUG;
            exit 0;
        };
        
@@ -69,7 +89,7 @@ sub _start_server {
        if(!$DEBUG){
            close *STDERR;
            close *STDOUT;
-           close *STDIN;
+           #close *STDIN;
        }
        
        diag("Selenium running in $$") if $DEBUG;
@@ -186,6 +206,24 @@ statement:
 
 C<MyApp> is the name of your Catalyst app.
 
+=head1 SEE ALSO
+
+=over 4 
+
+=item * 
+
+Selenium website: L<http://www.openqa.org/>
+
+=item * 
+
+Description of what you can do with the C<$sel> object: L<Test::WWW::Selenium>
+
+=item * 
+
+If you don't need a real web browser: L<Test::WWW::Mechanize::Catalyst>
+
+=back
+
 =head1 AUTHOR
 
 Jonathan Rockway, C<< <jrockway at cpan.org> >>
@@ -228,6 +266,8 @@ L<http://search.cpan.org/dist/Test-WWW-Selenium-Catalyst>
 
 =head1 ACKNOWLEDGEMENTS
 
+Thanks for mst for getting on my case to actually write this thing :)
+
 =head1 COPYRIGHT & LICENSE
 
 Copyright 2006 Jonathan Rockway, all rights reserved.