9
10
11
12
13
14
15
16
17
18
19
20
21
22
|
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
|
+
+
+
|
# Copyright (C) 2000 by Peter J. Gawthrop
###############################################################
## Version control history
###############################################################
## $Id$
## $Log$
## Revision 1.22 2003/08/19 13:08:44 gawthrop
## Ingnore if/endif
##
## Revision 1.21 2003/08/14 10:33:46 gawthrop
## Ignore if and endif
##
## Revision 1.20 2003/08/13 15:49:39 gawthrop
## Don't sort the states when defaulting - leave in implied order
##
## Revision 1.19 2003/08/05 15:29:36 gawthrop
|
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
|
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
|
-
+
|
if [ "${rep}" = "state" ]; then
info=`cut -f1 $infofile` # No sort
else
info=`cut -f1 $infofile | sort` # Sort
fi
i=0;
for new in $info; do
let i=$i+1;
i=$(( $i + 1 ));
initial_value $i ${default}
echo $new $value |\
gawk '{printf("%s\t= %s; # Default\n",$1,$2)}' >> $textfile
done
exit
fi
|