From: Dirk Koopman <djk@tobit.co.uk>
Date: Mon, 25 Jul 2016 17:56:26 +0000 (+0100)
Subject: Merge branch 'mojo' of /scm/spider into mojo
X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=commitdiff_plain;h=68fa2f8ae34d78464cb196851a7ce09ebef61b1b;hp=201dedf3e4325faab5c34b38135790012142286b;p=spider.git

Merge branch 'mojo' of /scm/spider into mojo
---

diff --git a/Changes b/Changes
index e1964270..0b307ae2 100644
--- a/Changes
+++ b/Changes
@@ -3,6 +3,8 @@
 08Jul16=======================================================================
 1. Add latest wpxloc.raw
 2. Add CTY-2609
+28Mar16=======================================================================
+1. Fix get/keps.pl so that it does the right fetch
 25Mar16=======================================================================
 1. Rework DXCron::spawn command to use Mojo::IOLoop::ForkCall
 04Jan16=======================================================================
diff --git a/cmd/get/keps.pl b/cmd/get/keps.pl
index 36e07568..a95cb670 100644
--- a/cmd/get/keps.pl
+++ b/cmd/get/keps.pl
@@ -151,13 +151,13 @@ sub handle
 	return (1, $self->msg('e24')) unless $Internet::allow;
 	return (1, $self->msg('e5')) if $self->priv < 8;
 	my $target = $Internet::keps_url || 'www.amsat.org';
-	my $path = $Internet::keps_path || '/amsat/ftp/keps/current/nasa.all';
+	my $path = $Internet::keps_path || '/amsat/ftp/keps/current/nasabare.txt';
 	my $port = 80;
 
 	dbg("keps: contacting $target:$port") if isdbg('keps');
 
 	Log('call', "$call: show/keps $line");
-	my $conn = AsyncMsg->post($self, $target, $port, $path, 
+	my $conn = AsyncMsg->get($self, $target, $path, 
 							  filter => \&process,
 							  on_disc => \&on_disc);