From owner-freebsd-stable  Mon Oct 21  3:48:40 2002
Delivered-To: freebsd-stable@freebsd.org
Received: from mx1.FreeBSD.org (mx1.freebsd.org [216.136.204.125])
	by hub.freebsd.org (Postfix) with ESMTP id 0965437B401
	for <freebsd-stable@freebsd.org>; Mon, 21 Oct 2002 03:48:39 -0700 (PDT)
Received: from rhadamanth.submonkey.net (pc1-cdif2-4-cust210.cdf.cable.ntl.com [80.4.10.210])
	by mx1.FreeBSD.org (Postfix) with ESMTP id 5526743E6E
	for <freebsd-stable@freebsd.org>; Mon, 21 Oct 2002 03:48:36 -0700 (PDT)
	(envelope-from setantae@submonkey.net)
Received: from setantae by rhadamanth.submonkey.net with local (Exim 4.10)
	id 183a6p-000AiB-00; Mon, 21 Oct 2002 11:48:31 +0100
Date: Mon, 21 Oct 2002 11:48:31 +0100
From: Ceri Davies <setantae@submonkey.net>
To: Randy Bush <randy@psg.com>
Cc: Simon Dick <simond@irrelevant.org>,
	FreeBSD Stable <freebsd-stable@freebsd.org>
Subject: Re: Syslog.pm Cannot get host name of local machine
Message-ID: <20021021104831.GB41131@submonkey.net>
Mail-Followup-To: Ceri Davies <setantae@submonkey.net>,
	Randy Bush <randy@psg.com>, Simon Dick <simond@irrelevant.org>,
	FreeBSD Stable <freebsd-stable@freebsd.org>
References: <E183ZhI-0000E4-00@rip.psg.com> <1035196522.1771.12.camel@linux> <20021021104053.GA41043@submonkey.net> <E183a3M-0000kD-00@rip.psg.com>
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Content-Disposition: inline
In-Reply-To: <E183a3M-0000kD-00@rip.psg.com>
X-message-flag: All your linuxconf-configured redhat are belong to us.
User-Agent: Mutt/1.5.1i
Sender: owner-freebsd-stable@FreeBSD.ORG
Precedence: bulk
List-ID: <freebsd-stable.FreeBSD.ORG>
List-Archive: <http://docs.freebsd.org/mail/> (Web Archive)
List-Help: <mailto:majordomo@FreeBSD.ORG?subject=help> (List Instructions)
List-Subscribe: <mailto:majordomo@FreeBSD.ORG?subject=subscribe%20freebsd-stable>
List-Unsubscribe: <mailto:majordomo@FreeBSD.ORG?subject=unsubscribe%20freebsd-stable>
X-Loop: FreeBSD.ORG

On Mon, Oct 21, 2002 at 03:44:56AM -0700, Randy Bush wrote:
> > Could I see your patch to Syslog.pm please ?
> 
> if you promise not to puke

;^) As long as I can get spamd working again, I don't care how crappy
the code is.

> *** /usr/libdata/perl/5.00503/Sys/Syslog.pm~    Mon Oct 21 03:17:14 2002
> --- /usr/libdata/perl/5.00503/Sys/Syslog.pm     Mon Oct 21 03:41:18 2002
> ***************
> *** 245,251 ****
>   sub connect {
>       unless ($host) {
>         require Sys::Hostname;
> !       my($host_uniq) = Sys::Hostname::hostname();
>         ($host) = $host_uniq =~ /([A-Za-z0-9_.-]+)/; # allow FQDN (inc _)
>       }
>       unless ( $sock_type ) {
> --- 245,252 ----
>   sub connect {
>       unless ($host) {
>         require Sys::Hostname;
> ! #     my($host_uniq) = Sys::Hostname::hostname();
> !       my($host_uniq) = `hostname`;
>         ($host) = $host_uniq =~ /([A-Za-z0-9_.-]+)/; # allow FQDN (inc _)
>       }
>       unless ( $sock_type ) {

That'll do pig, that'll do.

Ceri
-- 
you can't see when light's so strong
you can't see when light is gone

To Unsubscribe: send mail to majordomo@FreeBSD.org
with "unsubscribe freebsd-stable" in the body of the message