diff options
Diffstat (limited to 'mcon/mconfig.SH')
-rwxr-xr-x | mcon/mconfig.SH | 8 |
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 |