blob: d839b4c0b1efd2f4d431ca572b6c2674443e8cd0 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
|
--- c-nocem.in.orig 2000-05-23 09:39:01 UTC
+++ c-nocem.in
@@ -1,4 +1,4 @@
-#!@PERL@ -w
+#!@PERL@
# and once again for Emacs: -*-perl-*-
# NoCeM in the spool for C News and INN - grand unified program
@@ -30,9 +30,9 @@ $tmp="@newstmp@"; # create this director
$logfile="@newslogfile@";
$ENV{'PATH'}="@newspath@";
-require "getopts.pl";
+use Getopt::Std qw(getopts);
$opt_t=86400; $opt_l=$opt_a="";
-&Getopts("bc:t:nsd:klraz:C");
+&getopts("bc:t:nsd:klraz:C");
$storageapi=0;
$opt_c=99999999 if ($opt_C);
if ($opt_c) {
|
