summaryrefslogtreecommitdiff
path: root/mcon/mconfig.SH
diff options
context:
space:
mode:
Diffstat (limited to 'mcon/mconfig.SH')
-rwxr-xr-xmcon/mconfig.SH8
1 files changed, 5 insertions, 3 deletions
diff --git a/mcon/mconfig.SH b/mcon/mconfig.SH
index 2cc27c6..8fca79b 100755
--- a/mcon/mconfig.SH
+++ b/mcon/mconfig.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: mconfig.SH 25 2008-05-28 11:19:25Z rmanfredi $
+# $Id: mconfig.SH 114 2012-01-28 13:01:37Z rmanfredi $
#
# Copyright (c) 1991-1997, 2004-2006, Raphael Manfredi
#
@@ -65,8 +66,9 @@ $startperl
$spitshell >>mconfig <<'!NO!SUBS!'
chop($date = `date`);
&profile; # Read ~/.dist_profile
-require 'getopts.pl';
-&usage unless &Getopts("dhkmostvwGMVL:");
+
+use Getopt::Std;
+&usage unless getopts("dhkmostvwGMVL:");
$MC = $opt_L if $opt_L; # May override public library path
$MC = &tilda_expand($MC); # ~name expansion