16 lines
412 B
Plaintext
16 lines
412 B
Plaintext
$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";
|