$NetBSD: patch-webnew_pl,v 1.2 2015/08/21 08:18:26 wiz Exp $

With modern perl, 'do getopts' doesnt work any longer.

--- webnew.pl.orig	2001-05-27 22:08:01.000000000 +0000
+++ webnew.pl
@@ -66,7 +66,7 @@ $base = 'http://localhost/';
 $opt_c = "text";
 $opt_t = "What's new";
 
-do getopts('A:PRVac:de:inrt:vx');
+getopts('A:PRVac:de:inrt:vx');
 
 if ($opt_V) {
     print "webnew @WEBNEWVER@ (@WEBNEWDATE@)\n";
