10
11
12
13
14
15
16
17
18
19
20
21
22
23
|
# Copyright (c) P.J.Gawthrop 1996
###############################################################
## Version control history
###############################################################
## $Id$
## $Log$
## Revision 1.13 2000/04/04 15:22:44 peterg
## Major changes: simple components now work
## Single components now work
##
## Revision 1.12 1998/07/21 08:47:59 peterg
## Default null $2 (regexp) to '^' - ie match any line
##
|
>
>
>
|
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
|
# Copyright (c) P.J.Gawthrop 1996
###############################################################
## Version control history
###############################################################
## $Id$
## $Log$
## Revision 1.14 2000/10/03 18:29:26 peterg
## crs now works after a fashion
##
## Revision 1.13 2000/04/04 15:22:44 peterg
## Major changes: simple components now work
## Single components now work
##
## Revision 1.12 1998/07/21 08:47:59 peterg
## Default null $2 (regexp) to '^' - ie match any line
##
|
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
|
echo $comment $blurb
mtt2reps_txt
;;
crs)
echo $comment $blurb
find $find_path -name "$name" -print |\
awk '{print "grep", key, $1}' key=$key | sh |\
sed "s/$key //" | $sort
;;
*)
fullnames=`mtt_find $find_path "$name" | awk '{printf("%s/%s\n",$1,$2)}'`
N=`echo $fullnames | wc -w`;
if [ -z "$fullnames" ]; then
echo $comment No $blurb found.
else
echo $comment $N $blurb found.
for fullname in $fullnames; do
name=`basename $fullname`
if [ -n "$other" ]; then
cat $fullname | egrep $key
else
info=`cat $fullname | egrep $key | awk '{for (i=2;i<=NF;i++) print $i}'`
category=`echo $fullname | sed "s!$find_path/!!" `
category=`dirname $category`
echo $category $name $info
fi
done
fi
esac
exit
awk '{print "cat " $1 "/" $2}' | sh |\
egrep $key | egrep $regexp |\
sed "s/$summary[ ]*//" |\
sed "s/$description[ ]*/ /" |\
sed "s/$alias[ ]*/ Alias: /" |\
sed "s!$find_path/!!" |\
$sort
|
|
|
|
|
|
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
|
echo $comment $blurb
mtt2reps_txt
;;
crs)
echo $comment $blurb
find $find_path -name "$name" -print |\
gawk '{print "grep", key, $1}' key=$key | sh |\
sed "s/$key //" | $sort
;;
*)
fullnames=`mtt_find $find_path "$name" | gawk '{printf("%s/%s\n",$1,$2)}'`
N=`echo $fullnames | wc -w`;
if [ -z "$fullnames" ]; then
echo $comment No $blurb found.
else
echo $comment $N $blurb found.
for fullname in $fullnames; do
name=`basename $fullname`
if [ -n "$other" ]; then
cat $fullname | egrep $key
else
info=`cat $fullname | egrep $key | gawk '{for (i=2;i<=NF;i++) print $i}'`
category=`echo $fullname | sed "s!$find_path/!!" `
category=`dirname $category`
echo $category $name $info
fi
done
fi
esac
exit
gawk '{print "cat " $1 "/" $2}' | sh |\
egrep $key | egrep $regexp |\
sed "s/$summary[ ]*//" |\
sed "s/$description[ ]*/ /" |\
sed "s/$alias[ ]*/ Alias: /" |\
sed "s!$find_path/!!" |\
$sort
|