8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
|
# Creates tk/tcl menus for xmtt.
# Copyright (c) P.J.Gawthrop, 1998,1999
#MTT blurb
title=`mtt --version`
#Collect all systems (inc dir name)
dirname="basename `pwd`"
systems=`echo *_abg.fig | sed 's/\([a-zA-Z0-9]*\)_abg.fig/\1/g'`
dirname_in_systems=`echo $systems | grep -c $dirname`
if [ "$dirname_in_systems" = "0" ]; then
systems="$systems $dirname"
fi
# Default system
|
>
|
|
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
|
# Creates tk/tcl menus for xmtt.
# Copyright (c) P.J.Gawthrop, 1998,1999
#MTT blurb
title=`mtt --version`
#Collect all systems (inc dir name)
pwd=`pwd`;
dirname=`basename $pwd`
systems=`echo *_abg.fig | sed 's/\([a-zA-Z0-9]*\)_abg.fig/\1/g'`
dirname_in_systems=`echo $systems | grep -c $dirname`
if [ "$dirname_in_systems" = "0" ]; then
systems="$systems $dirname"
fi
# Default system
|