summaryrefslogtreecommitdiff
path: root/mcon/mxref.SH
diff options
context:
space:
mode:
authorManoj Srivastava <srivasta@golden-gryphon.com>2014-04-27 18:05:39 -0700
committerManoj Srivastava <srivasta@golden-gryphon.com>2014-04-27 18:05:39 -0700
commit7d4c02d5c9108aa413fbb0ffa1dc8a39bc5f54a1 (patch)
tree2abb9ad01d397bc1e208f57f528c1ec529761392 /mcon/mxref.SH
parent5c913c35c09a82eead2c07534baa709a5dead3e7 (diff)
parent8f5e5726134ce5b4bd436b16f367796d851df553 (diff)
Merge branch 'upstream'
Signed-off-by: Manoj Srivastava <srivasta@golden-gryphon.com> Conflicts: jmake/jmake.man
Diffstat (limited to 'mcon/mxref.SH')
-rwxr-xr-xmcon/mxref.SH8
1 files changed, 5 insertions, 3 deletions
diff --git a/mcon/mxref.SH b/mcon/mxref.SH
index 1425833..6177c92 100755
--- a/mcon/mxref.SH
+++ b/mcon/mxref.SH
@@ -11,6 +11,7 @@ case $CONFIG in
. $TOP/config.sh
;;
esac
+REVISION=`grep REVISION $TOP/revision.h | head -n1 | cut -d' ' -f4`
case "$0" in
*/*) cd `expr X$0 : 'X\(.*\)/'` ;;
esac
@@ -20,7 +21,7 @@ $startperl
eval 'exec perl -S \$0 \${1+"\$@"}'
if \$running_under_some_shell;
-# $Id: mxref.SH 25 2008-05-28 11:19:25Z rmanfredi $
+# $Id: mxref.SH 114 2012-01-28 13:01:37Z rmanfredi $
#
# Copyright (c) 1991-1997, 2004-2006, Raphael Manfredi
#
@@ -57,8 +58,9 @@ $startperl
$spitshell >>mxref <<'!NO!SUBS!'
&profile; # Read ~/.dist_profile
-require 'getopts.pl';
-&usage unless &Getopts("df:hkmsVL:");
+
+use Getopt::Std;
+&usage unless getopts("df:hkmsVL:");
chop($date = `date`);
chop($WD = `pwd`); # Working directory