aboutsummaryrefslogtreecommitdiff
path: root/japanese/diclookup-emacs20/files/deinstall-diclookup.sh
blob: 1b5079b4eb9623cac3f832505f3f0a16d0212a42 (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
#!/bin/sh
/usr/bin/dialog --title "ja-diclookup-mule deinstallation script" --clear \
	--yesno "\n\
Removing diclookup-mule initialization code from site-start.el \n\
Are you sure?" -1 -1
RETVAL=$?

if [ "X${RETVAL}" = "X0" ] ; then # answer is `Yes'. hack diclookup-mule.
cp PREFIX_DIR/share/emacs/20.7/site-lisp/site-start.el PREFIX_DIR/share/emacs/20.7/site-lisp/site-start.el.bak
grep -v diclookup-mule PREFIX_DIR/share/emacs/20.7/site-lisp/site-start.el.bak > PREFIX_DIR/share/emacs/20.7/site-lisp/site-start.el

/usr/bin/dialog --title "Message" --clear \
	--msgbox "Thank you for using diclookup-mule.  A bientot." -1 -1
fi