From: Chris Hanson <org/chris-hanson/cph>
Date: Tue, 18 Jun 2002 17:59:21 +0000 (+0000)
Subject: Allow alternate version to be provided as argument.
X-Git-Tag: 20090517-FFI~2177
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=b5f6c7dc73a615239472d02d5030ed31a2494d2f;p=mit-scheme.git

Allow alternate version to be provided as argument.
---

diff --git a/v7/dist/make-src-files b/v7/dist/make-src-files
index bdb388f41..ef2a6e044 100755
--- a/v7/dist/make-src-files
+++ b/v7/dist/make-src-files
@@ -1,8 +1,8 @@
 #!/bin/sh
 
-# $Id: make-src-files,v 1.19 2001/11/26 20:26:36 cph Exp $
+# $Id: make-src-files,v 1.20 2002/06/18 17:59:21 cph Exp $
 #
-# Copyright (c) 2000-2001 Massachusetts Institute of Technology
+# Copyright (c) 2000-2002 Massachusetts Institute of Technology
 #
 # This program is free software; you can redistribute it and/or modify
 # it under the terms of the GNU General Public License as published by
@@ -21,10 +21,19 @@
 
 . /scheme/v7/dist/release-prefix
 
+if [ $# -eq 0 ]; then
+  VERSION="$(get_release)"
+elif [ $# -eq 1 ]; then
+  VERSION="${1}"
+else
+  echo "usage: $0 [VERSION]"
+  exit 1
+fi
+
 INSTALL="install"
 INSTALL_DATA="${INSTALL} -m 644"
-PREFIX="$(get_release_prefix)"
-TAG="$(get_release_tag)"
+PREFIX="$(get_release_prefix "${VERSION}")"
+TAG="$(get_release_tag "${VERSION}")"
 CVS="cvs -d /scheme/cvsroot"
 
 rm -rf ${PREFIX}