From owner-svn-ports-head@freebsd.org Fri May 12 19:48:18 2017 Return-Path: Delivered-To: svn-ports-head@mailman.ysv.freebsd.org Received: from mx1.freebsd.org (mx1.freebsd.org [IPv6:2001:1900:2254:206a::19:1]) by mailman.ysv.freebsd.org (Postfix) with ESMTP id F08A3D6967A; Fri, 12 May 2017 19:48:18 +0000 (UTC) (envelope-from feld@FreeBSD.org) Received: from repo.freebsd.org (repo.freebsd.org [IPv6:2610:1c1:1:6068::e6a:0]) (using TLSv1.2 with cipher ECDHE-RSA-AES256-GCM-SHA384 (256/256 bits)) (Client did not present a certificate) by mx1.freebsd.org (Postfix) with ESMTPS id A61C8EB8; Fri, 12 May 2017 19:48:18 +0000 (UTC) (envelope-from feld@FreeBSD.org) Received: from repo.freebsd.org ([127.0.1.37]) by repo.freebsd.org (8.15.2/8.15.2) with ESMTP id v4CJmHvL001082; Fri, 12 May 2017 19:48:17 GMT (envelope-from feld@FreeBSD.org) Received: (from feld@localhost) by repo.freebsd.org (8.15.2/8.15.2/Submit) id v4CJmHvJ001080; Fri, 12 May 2017 19:48:17 GMT (envelope-from feld@FreeBSD.org) Message-Id: <201705121948.v4CJmHvJ001080@repo.freebsd.org> X-Authentication-Warning: repo.freebsd.org: feld set sender to feld@FreeBSD.org using -f From: Mark Felder Date: Fri, 12 May 2017 19:48:17 +0000 (UTC) To: ports-committers@freebsd.org, svn-ports-all@freebsd.org, svn-ports-head@freebsd.org Subject: svn commit: r440707 - in head/dns/dnswalk: . files X-SVN-Group: ports-head MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit X-BeenThere: svn-ports-head@freebsd.org X-Mailman-Version: 2.1.23 Precedence: list List-Id: SVN commit messages for the ports tree for head List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , X-List-Received-Date: Fri, 12 May 2017 19:48:19 -0000 Author: feld Date: Fri May 12 19:48:17 2017 New Revision: 440707 URL: https://svnweb.freebsd.org/changeset/ports/440707 Log: dns/dnswalk: Unbreak port Deprecated Perl syntax was preventing the port from working. Approved by: portmgr MFH: 2017Q2 Added: head/dns/dnswalk/files/ head/dns/dnswalk/files/patch-dnswalk (contents, props changed) Modified: head/dns/dnswalk/Makefile Modified: head/dns/dnswalk/Makefile ============================================================================== --- head/dns/dnswalk/Makefile Fri May 12 19:39:06 2017 (r440706) +++ head/dns/dnswalk/Makefile Fri May 12 19:48:17 2017 (r440707) @@ -3,7 +3,7 @@ PORTNAME= dnswalk PORTVERSION= 2.0.2 -PORTREVISION= 2 +PORTREVISION= 3 CATEGORIES= dns MASTER_SITES= SF Added: head/dns/dnswalk/files/patch-dnswalk ============================================================================== --- /dev/null 00:00:00 1970 (empty, because file is newly added) +++ head/dns/dnswalk/files/patch-dnswalk Fri May 12 19:48:17 2017 (r440707) @@ -0,0 +1,32 @@ +--- dnswalk.orig 2017-05-12 19:34:32 UTC ++++ dnswalk +@@ -56,9 +56,9 @@ sub dowalk { + return unless $domain; + print "Checking $domain\n"; + @subdoms=&doaxfr($domain); +- &check_zone($domain) if (defined(@zone) && @zone); ++ &check_zone($domain) if (@zone); + undef @zone; +- return if (!(defined(@subdoms) && @subdoms)); ++ return if (! @subdoms); + @sortdoms = sort byhostname @subdoms; + local ($subdom); + if ($opt_r) { +@@ -84,7 +84,7 @@ sub doaxfr { + my $res = new Net::DNS::Resolver; + $res->nameservers($server); + @zone=$res->axfr($domain); +- unless (defined(@zone) && @zone) { ++ unless (@zone) { + print STDERR "failed\n"; + &printerr("FAIL", + "Zone transfer of $domain from $server failed: ". +@@ -104,7 +104,7 @@ sub doaxfr { + print STDERR "done.\n"; + last SERVER; + } # foreach # +- unless (defined(@zone) && @zone) { ++ unless (@zone) { + &printerr("BAD","All zone transfer attempts of $domain failed!\n"); + return undef; + }