summaryrefslogtreecommitdiff
path: root/japanese/diclookup-emacs20/files/deinstall-diclookup.sh
diff options
context:
space:
mode:
Diffstat (limited to 'japanese/diclookup-emacs20/files/deinstall-diclookup.sh')
-rw-r--r--japanese/diclookup-emacs20/files/deinstall-diclookup.sh14
1 files changed, 14 insertions, 0 deletions
diff --git a/japanese/diclookup-emacs20/files/deinstall-diclookup.sh b/japanese/diclookup-emacs20/files/deinstall-diclookup.sh
new file mode 100644
index 000000000000..add03bf16586
--- /dev/null
+++ b/japanese/diclookup-emacs20/files/deinstall-diclookup.sh
@@ -0,0 +1,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/lib/mule/site-lisp/site-start.el PREFIX_DIR/lib/mule/site-lisp/site-start.el.bak
+grep -v diclookup-mule PREFIX_DIR/lib/mule/site-lisp/site-start.el.bak > PREFIX_DIR/lib/mule/site-lisp/site-start.el
+
+/usr/bin/dialog --title "Message" --clear \
+ --msgbox "Thank you for using diclookup-mule. A bientot." -1 -1
+fi