diff options
| author | fukachan <fukachan> | 2001-07-30 23:00:06 +0000 |
|---|---|---|
| committer | fukachan <fukachan> | 2001-07-30 23:00:06 +0000 |
| commit | b1db93cc5471ce24b0ec1153a2d407ffd35e87a0 (patch) | |
| tree | 654b95a4d570703c4a62f5136ba5b2c4fe20c453 | |
| parent | 053513eeb513eb938821c78518f987ba72c7ffe6 (diff) | |
| download | fml8-b1db93cc5471ce24b0ec1153a2d407ffd35e87a0.tar.gz fml8-b1db93cc5471ce24b0ec1153a2d407ffd35e87a0.tar.bz2 fml8-b1db93cc5471ce24b0ec1153a2d407ffd35e87a0.zip | |
show hints
| -rwxr-xr-x | regress/message/bounce.pl | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/regress/message/bounce.pl b/regress/message/bounce.pl index a7ac9b37..9c5971bf 100755 --- a/regress/message/bounce.pl +++ b/regress/message/bounce.pl @@ -5,7 +5,7 @@ # All rights reserved. This program is free software; you can # redistribute it and/or modify it under the same terms as Perl itself. # -# $FML: bounce.pl,v 1.6 2001/04/15 13:29:28 fukachan Exp $ +# $FML: bounce.pl,v 1.7 2001/05/05 06:21:12 fukachan Exp $ # use strict; @@ -41,6 +41,11 @@ for my $f (@ARGV) { print " reason: "; print $bouncer->reason( $a ); print "\n"; + + print " hints: "; + print $bouncer->hints( $a ); + print "\n"; + print "\n"; } } |