diff options
| author | Peter Palfrader <peter@palfrader.org> | 2003-02-16 10:24:45 +0000 |
|---|---|---|
| committer | Peter Palfrader <peter@palfrader.org> | 2003-02-16 10:24:45 +0000 |
| commit | ca75e9a32c36cc1bd90126d09c260d8ffe934306 (patch) | |
| tree | 679b25d4bb7a200effaa341d06b03dc3fd170ad1 /Echolot | |
| parent | fd5b8e816c340acf254dbe7281af45e887b3cc35 (diff) | |
after begin comes end
Diffstat (limited to 'Echolot')
| -rw-r--r-- | Echolot/Tools.pm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/Echolot/Tools.pm b/Echolot/Tools.pm index 0202cc3..88dd0d2 100644 --- a/Echolot/Tools.pm +++ b/Echolot/Tools.pm @@ -1,7 +1,7 @@ package Echolot::Tools; # (c) 2002 Peter Palfrader <peter@palfrader.org> -# $Id: Tools.pm,v 1.17 2003/02/16 10:20:10 weasel Exp $ +# $Id: Tools.pm,v 1.18 2003/02/16 10:24:45 weasel Exp $ # =pod @@ -330,9 +330,9 @@ sub make_garbage() { $random = unpack("H*", $random); $random = join "\n", grep { $_ ne '' } (split /(.{64})/, $random); - $random = "----- BEGIN GARBAGE' -----\n". + $random = "----- BEGIN GARBAGE -----\n". $random."\n". - "----- BEGIN GARBAGE' -----\n"; + "----- END GARBAGE -----\n"; return $random; }; |