Skip site navigation (1)Skip section navigation (2) 
Date:      Mon, 21 Oct 2002 03:44:56 -0700
From:      Randy Bush <randy@psg.com>
To:        Ceri Davies <setantae@submonkey.net>
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:  <E183a3M-0000kD-00@rip.psg.com>
References:  <E183ZhI-0000E4-00@rip.psg.com> <1035196522.1771.12.camel@linux> <20021021104053.GA41043@submonkey.net>
next in thread | previous in thread | raw e-mail | index | archive | help 
> Could I see your patch to Syslog.pm please ?

if you promise not to puke

*** /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 ) {


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

Want to link to this message? Use this URL: <https://mail-archive.FreeBSD.org/cgi/mid.cgi?E183a3M-0000kD-00>