Mercurial > hg > xemacs-beta

comparison lwlib/energize/fidget-widget @ 0:376386a54a3c r19-14

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r19-14
author cvs
date Mon, 13 Aug 2007 08:45:50 +0200
parents
children
comparison
equal deleted inserted replaced
-1:000000000000 0:376386a54a3c
1 #!/bin/sh
2 # fidget-widget modifies the output of XDesigner.
3 # the creation function returns widget1 and does not create the parent.
4 # marc + matthieu
5
6 NAME=$2
7 FILE=$1
8 case $FILE in
9 *ctreebr_ps.xdc|*classbr_ps.xdc|*leb_psheet.xdc) filter="grep -v Offset" ;;
10 *) filter=cat ;;
11 esac
12 sed "
13 /^\*\* Generated by / a\\
14 ** Modified by fidget-widget, `date +%d-%h-%y`
15 /Widget widget0/d
16 /^create_widget0/s//Widget $NAME/
17 /int h_spacing/s//short h_spacing/
18 /widget0 =/d
19 /widget1 =/s/widget0/parent/
20 /^}/i\\
21 return widget1;
22 " $FILE | $filter