--- Canary-Stability/Stability.pm	2015/06/04 16:18:26	1.2
+++ Canary-Stability/Stability.pm	2015/06/27 17:00:20	1.6
@@ -1,28 +1,33 @@
 =head1 NAME
 
-Canary::Stability - to be done
+Canary::Stability - canary to check perl compatibility for schmorp's modules
 
 =head1 SYNOPSIS
 
- use Canary::Stability;
+ # in Makefile.PL
+ use Canary::Stability DISTNAME => 2001, MINIMUM_PERL_VERSION;
 
 =head1 DESCRIPTION
 
-This is just a placeholder module, to be filled in later.
+This module is used by Schmorp's modules during configuration stage to
+test the installed perl for compatibility with his modules.
 
-=over 4
+It's not, at this stage, meant as a tool for other module authors,
+although in principle nothing prevents them from subscribing to the same
+ideas.
+
+See the F<Makefile.PL> in L<Coro> or L<AnyEvent> for usage examples.
 
 =cut
 
 package Canary::Stability;
 
 BEGIN {
-   $VERSION = 2001; # the year perl was accomodating enough to developers to foster weird ideas such as Coro
+   $VERSION = 2006;
 }
 
 sub sgr {
    # we just assume ANSI almost everywhere
-
    # red 31, yellow 33, green 32
 
    $ENV{PERL_CANARY_STABILITY_COLOUR} ne 0
@@ -43,7 +48,7 @@
       print <<EOF;
 
 ***
-*** The stability canary says: (nothing, he died of old age).
+*** The stability canary says: (nothing, it died of old age).
 ***
 *** Your Canary::Stability module (used by $distname) is too old.
 *** This is not a fatal problem - while you might want to upgrade to version
@@ -60,12 +65,12 @@
       print <<EOF;
 
 ***
-*** The stability canary says: chirp... (it seems a bit unhappy).
+*** The stability canary says: chirp (it seems concerned about something).
 ***
 *** Your perl version ($]) is older than the $distname distribution
 *** likes ($minperl). This is not a fatal problem - the module might work
 *** well with your version of perl, but it does mean the author likely
-*** won't do anything to make it wokr if it breaks.
+*** won't do anything to make it work if it breaks.
 ***
 
 EOF
@@ -86,8 +91,8 @@
 ***
 
 EOF
-   } elsif ($] <= 4.020) {
-      sgr 32;
+   } elsif ($] < 5.021) {
+      #sgr 32;
       print <<EOF;
 
 ***
@@ -139,8 +144,8 @@
 ***    Set PERL_CANARY_STABILITY_NOPROMPT=1 in your environment.
 ***    More info is in the Canary::Stability manpage.
 ***
-*** Long version of this FAQ: http://stabilityperl.schmorp.de/faq.html
-*** Stability Branch homepage: http://stabilityperl.schmorp.de/
+*** Long version of this FAQ: http://stableperl.schmorp.de/faq.html
+*** Stability Branch homepage: http://stableperl.schmorp.de/
 ***
 
 EOF
@@ -181,7 +186,7 @@
 =head1 AUTHOR
 
  Marc Lehmann <schmorp@schmorp.de>
- http://home.schmorp.de/
+ http://software.schmorp.de/pkg/Canary-Stability.html
 
 =cut