From:	ADVAX::"mcnc!VM1.NoDak.EDU!glass%VIXVAX.MGI.COM" "William H. Glass"  7-MAR-1991 11:59:44.29
To:	Multiple recipients of list ANU-NEWS <ANU-NEWS@NDSUVM1>
CC:	
Subj:	Re: error with arbitron executable....

Received: by ADVAX.DECnet (utk-mail11 v1.5) ; Thu, 7 Mar 91 11:58:37 EST
Received:  from mcnc by ge-dab.GE.COM (5.61/GE-DAB 1.15) with UUCP
	id AA00883 for ; Thu, 7 Mar 91 11:29:05 -0500
Received: from VM1.NoDak.EDU by mcnc.mcnc.org (5.59/MCNC/6-11-90)
	id AA02774; Thu, 7 Mar 91 09:57:22 -0500
	for ARISIA.DNET.ge.com!EVERHART
Message-Id: <9103071457.AA02774@mcnc.mcnc.org>
Received: from NDSUVM1.BITNET by VM1.NoDak.EDU (IBM VM SMTP R1.2.1MX) with BSMTP id 9877; Thu, 07 Mar 91 08:58:50 CST
Received: from NDSUVM1.BITNET by NDSUVM1.BITNET (Mailer R2.07) with BSMTP id
 4160; Thu, 07 Mar 91 08:58:49 CST
Date:         Thu, 7 Mar 91 00:33:11 CST
Reply-To: "William H. Glass" <mcnc!VM1.NoDak.EDU!glass%VIXVAX.MGI.COM>
Sender: ANU-NEWS Discussion <ANU-NEWS@VM1.NoDak.EDU>
From: "William H. Glass" <mcnc!VM1.NoDak.EDU!glass%VIXVAX.MGI.COM>
Subject:      Re: error with arbitron executable....
To: Multiple recipients of list ANU-NEWS <ANU-NEWS@NDSUVM1>
 
   Well folks, here's the patch to the Arbitron program that I mentioned
several days ago.  It's rather ugly, it doesn't solve all the problems,
and I'm certainly not proud of it.  On the other hand, it does work and I
guess that's what counts.  The output you get on your terminal will get
messed up with irrelevant messages about old newsgroups being deleted.  I
haven't been able to find an easy way to get rid of those messages.  It just
wasn't worth making another compile time switch - or even a run time one.
 
   Bill Glass
 
________________________________________________________________________________
 
*** arbitron.c;1
--- arbitron.c
**************
*** 79,84
 
  typedef unsigned long SYSTIME[2];
 
  static struct FAB uaffab;
  static struct RAB uafrab;
  static struct UAFDEF record;
--- 79,86 -----
 
  typedef unsigned long SYSTIME[2];
 
+ int profile_flags = 0;
+
  static struct FAB uaffab;
  static struct RAB uafrab;
  static struct UAFDEF record;
**************
*** 186,192
            continue;                   /* skip this user */
            }
 
!       clear_profile_flags (); /* get rid of profile info from other users */
        read_reg_file ();       /* read the NEWSRC file */
        user_reads_news = FALSE;
 
--- 188,194 -----
            continue;                   /* skip this user */
            }
 
!       profile_flags = 0;      /* get rid of profile info from other users */
        read_reg_file ();       /* read the NEWSRC file */
        user_reads_news = FALSE;
 
**************
*** 404,406
        exit (0);
        }
  }
--- 406,428 -----
        exit (0);
        }
  }
+
+ void profile_read(f)
+ FILE *f;
+ {
+       return;
+ }
+
+ void profile_write(f)
+ FILE *f;
+ {
+       return;
+ }
+
+ int do_show_profile() { return(0); }
+
+ int do_set_profile() { return(0); }
+
+ void selgrp_action() { return; }
+
+ FILE *profile_sigfile() { return(0); }
