fix mk-latest

diff --git a/Makefile b/Makefile
index ab069ec9c8972daa17ddf565525d7be0f61c2e7b..4f48bd5d3a53871771ed1561df93b718a8f86b4a 100644 (file)
--- a/Makefile
+++ b/Makefile
@@ -81,7 +81,7 @@ docs/fips.inc:
 
 source/.htaccess:
        @rm -f @?
-       ./bin/mk-latest >$@
+       ./bin/mk-latest source >$@
 source/license.txt: $(SNAP)/LICENSE
        @rm -f $@
        cp $? $@

diff --git a/bin/mk-latest b/bin/mk-latest
index 519c353b2856d080e35471320142a6f9fb9b9eb6..14f586f3d93a49b0ad086b79473c6b0636b0b997 100755 (executable)
--- a/bin/mk-latest
+++ b/bin/mk-latest
@@ -1,8 +1,16 @@
 #! /usr/bin/perl -w
 use strict;
 
+die "Missing args\n" if $#ARGV < 0;
+my $SRCDIR = $ARGV[0]; shift;
+
+chdir $SRCDIR || die "Can't chdir $SRCDIR, $!";
+
 my @tarballs =
-       sort grep /openssl-\d+\.\d+\.\d+[a-z]*\.tar\.gz$/, glob("openssl-*.tar.gz");
+       sort grep /openssl-\d+\.\d+\.\d+[a-z]*\.tar\.gz$/,
+               glob("openssl-*.tar.gz");
+die "No tgz files found in $SRCDIR?\n" if $#tarballs < 1;
+
 my %series = ();
 foreach(@tarballs) {
        my ($version, $serie) = /^openssl-((\d+\.\d+\.\d+)[a-z]*)\./;