From mboxrd@z Thu Jan  1 00:00:00 1970
Return-Path: <zsh-workers-return-23686-mason-zsh=primenet.com.au@sunsite.dk>
Received: (qmail 26747 invoked from network); 19 Jul 2007 15:49:06 -0000
X-Spam-Checker-Version: SpamAssassin 3.2.1 (2007-05-02) on f.primenet.com.au
X-Spam-Level: 
X-Spam-Status: No, score=-2.6 required=5.0 tests=AWL,BAYES_00 autolearn=ham
	version=3.2.1
Received: from news.dotsrc.org (HELO a.mx.sunsite.dk) (130.225.247.88)
  by ns1.primenet.com.au with SMTP; 19 Jul 2007 15:49:06 -0000
Received-SPF: none (ns1.primenet.com.au: domain at sunsite.dk does not designate permitted sender hosts)
Received: (qmail 73004 invoked from network); 19 Jul 2007 15:48:59 -0000
Received: from sunsite.dk (130.225.247.90)
  by a.mx.sunsite.dk with SMTP; 19 Jul 2007 15:48:59 -0000
Received: (qmail 4158 invoked by alias); 19 Jul 2007 15:48:52 -0000
Mailing-List: contact zsh-workers-help@sunsite.dk; run by ezmlm
Precedence: bulk
X-No-Archive: yes
X-Seq: 23686
Received: (qmail 4126 invoked from network); 19 Jul 2007 15:48:51 -0000
Received: from news.dotsrc.org (HELO a.mx.sunsite.dk) (130.225.247.88)
  by sunsite.dk with SMTP; 19 Jul 2007 15:48:51 -0000
Received: (qmail 71888 invoked from network); 19 Jul 2007 15:48:50 -0000
Received: from acolyte.scowler.net (216.254.112.45)
  by a.mx.sunsite.dk with SMTP; 19 Jul 2007 15:48:46 -0000
Received: by acolyte.scowler.net (Postfix, from userid 1000)
	id 0D1D55C5C3; Thu, 19 Jul 2007 11:48:43 -0400 (EDT)
Date: Thu, 19 Jul 2007 11:48:43 -0400
From: Clint Adams <clint@zsh.org>
To: zsh-workers@sunsite.dk
Cc: Magnus Therning <magnus@therning.org>
Subject: PATCH: _tin respecting TIN_HOMEDIR
Message-ID: <20070719154843.GA29280@scowler.net>
Mail-Followup-To: zsh-workers@sunsite.dk,
	Magnus Therning <magnus@therning.org>
MIME-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Content-Disposition: inline
User-Agent: Mutt/1.5.16 (2007-06-11)

This is from Magnus Therning, slightly tweaked, and I forgot to Cc it to
the list.

Index: Completion/Unix/Command/_tin
===================================================================
RCS file: /cvsroot/zsh/zsh/Completion/Unix/Command/_tin,v
retrieving revision 1.1
diff -u -r1.1 _tin
--- Completion/Unix/Command/_tin	2 Apr 2001 12:04:41 -0000	1.1
+++ Completion/Unix/Command/_tin	19 Jul 2007 15:29:59 -0000
@@ -37,7 +37,7 @@
   '::newsgroup:_newsgroups' && return 0
 
 if [[ "$state" = newshosts ]]; then
-  newshosts=( ${${(f)"$(<~/.tin/newsrctable)"}%%\#*} ) 2>/dev/null
+  newshosts=( ${${(f)"$(<${TIN_HOMEDIR:-$HOME}/.tin/newsrctable)"}%%\#*} ) 2>/dev/null
   _tags hosts nicknames
   while _tags; do
     _requested hosts expl 'NNTP server hostname' \