This should make Stas happy.

p4raw-id: //depot/perl@20182

1 files changed, 2 insertions, 1 deletions

diff --git a/perl.c b/perl.c
index bfe3cccd6f..0968e26363 100644
--- a/perl.c
+++ b/perl.c
@@ -901,7 +901,8 @@ setuid perl scripts securely.\n");
     /* [perl #22371] Algorimic Complexity Attack on Perl 5.6.1, 5.8.0
      * This MUST be done before any hash stores or fetches take place.
      * If you set PL_hash_seed (and assumedly also PL_hash_seed_set) yourself,
-     * it is your responsibility to provide a good random seed! */
+     * it is your responsibility to provide a good random seed!
+     * You can also define PERL_HASH_SEED in compile time, see hv.h. */
     if (!PL_hash_seed_set)
 	 PL_hash_seed = get_hash_seed();
     {