INN commit: trunk (backends/send-uucp.in frontends/scanspool.in)

INN Commit Russ_Allbery at isc.org
Tue Sep 18 13:14:28 UTC 2007


    Date: Tuesday, September 18, 2007 @ 06:14:28
  Author: iulius
Revision: 7682

Remove unused variables, fix paths and another unaccurate newsfeeds
entry for control newsgroups.

Modified:
  trunk/backends/send-uucp.in
  trunk/frontends/scanspool.in

------------------------+
 backends/send-uucp.in  |    2 +-
 frontends/scanspool.in |   12 ++++++------
 2 files changed, 7 insertions(+), 7 deletions(-)

Modified: backends/send-uucp.in
===================================================================
--- backends/send-uucp.in	2007-09-18 12:10:12 UTC (rev 7681)
+++ backends/send-uucp.in	2007-09-18 13:14:28 UTC (rev 7682)
@@ -363,7 +363,7 @@
 is kept between S<4 KB> and S<1 KB>:
 
     zoetermeer\
-        :*,!junk,!control/!foo\
+        :*,!junk,!control,!control.*/!foo\
         :Tf,Wnb,B4096/1024:
 
 =head1 FILES

Modified: frontends/scanspool.in
===================================================================
--- frontends/scanspool.in	2007-09-18 12:10:12 UTC (rev 7681)
+++ frontends/scanspool.in	2007-09-18 13:14:28 UTC (rev 7682)
@@ -7,13 +7,13 @@
 #
 # This code is placed in the public domain.
 #
-# scanspool - perform a big scan over all articles in /usr/spool/news
+# scanspool - perform a big scan over all articles in @SPOOLDIR@/articles
 #
 # usage:
 #    scanspool [-a active_file] [-s spool_dir] [-v] [-c] [-n]
 #
-#    -a active_file	active file to use (default /usr/lib/news/active)
-#    -s spool_dir	spool tree (default /usr/spool/news)
+#    -a active_file	active file to use (default @DBDIR@/active)
+#    -s spool_dir	spool tree (default @SPOOLDIR@/articles)
 #    -v 		verbose mode
 #			verbose messages begin with a tab
 #			show articles found in non-active directories
@@ -98,6 +98,8 @@
 #
 require "getopts.pl";
 
+use vars qw($opt_c);
+
 # setup non-buffered stdout and stderr
 #
 select(STDERR);
@@ -159,7 +161,6 @@
     local ($low);		# low article number
     local ($high);		# high article number
     local ($type);		# type of newsgroup (4th active field)
-    local ($field5);		# 5th active field (should not exist)
     local ($dir);		# directory path of group from $spool
     local ($alias);		# realname of an aliased group
     local ($linenum);		# active file line number
@@ -301,12 +302,11 @@
 # lost+found will also be ignored.
 #
 # given:
-#	$spooldir  - top of /usr/spool/news article tree
+#	$spooldir  - top of @SPOOLDIR@/articles tree
 #
 sub check_spool
 {
     local ($spooldir) = $_[0];	# top of article tree
-    local (*FILEFILE);		# pipe from the find files process
     local ($filename);		# article pathname under $spool
     local ($artgrp);		# group of an article
     local ($artnum);		# article number in a group



More information about the inn-committers mailing list