ease sending cpan reports by adding the default recipient address

requested by & ok okan@
This commit is contained in:
simon 2008-01-29 21:00:27 +00:00
parent 0adb28c834
commit 6692106c6c

View File

@ -1,5 +1,5 @@
#!/usr/bin/perl
# $OpenBSD: cpanreport,v 1.1 2008/01/27 23:28:25 simon Exp $
# $OpenBSD: cpanreport,v 1.2 2008/01/29 21:00:27 simon Exp $
# Copyright (c) 2007, 2008 Simon Bertrang <simon@openbsd.org>
# Redistribution and use in source and binary forms, with or without
# modification, are permitted provided that the following conditions
@ -77,5 +77,7 @@ if ($log) {
$reporter->comments($log);
}
printf STDOUT "To: %s\n", $reporter->address();
$reporter->write(\*STDOUT);