===================================================================
RCS file: /home/cvs/OpenXM/src/asir-mode/use-asir-mode.sh,v
retrieving revision 1.1
retrieving revision 1.4
diff -u -p -r1.1 -r1.4
--- OpenXM/src/asir-mode/use-asir-mode.sh	2016/02/12 02:39:26	1.1
+++ OpenXM/src/asir-mode/use-asir-mode.sh	2019/09/30 02:42:57	1.4
@@ -1,5 +1,5 @@
 #!/bin/sh
-# $OpenXM$
+# $OpenXM: OpenXM/src/asir-mode/use-asir-mode.sh,v 1.3 2019/06/12 06:14:20 takayama Exp $
 
 _ok_local() {
 	echo "------------------------------------------------------------------"
@@ -18,22 +18,40 @@ _ok_local() {
 
 _install_local() {
 	mkdir -p $HOME/.emacs.d/OpenXM
-	cp $OpenXM_HOME/share/emacs/asir-mode.el $HOME/.emacs.d/OpenXM
+	sed -e 's/(insert "asir")/(insert "openxm asir")/g' $OpenXM_HOME/share/emacs/asir-mode.el >$HOME/.emacs.d/OpenXM/asir-mode.el
 	cat $OpenXM_HOME/share/emacs/use-asir-mode-local.txt >>$HOME/.emacs.d/init.el
 }
 
+_check() {
+    if [ -f $HOME/.emacs ]; then
+	grep 'emacs\.d/init\.el' $HOME/.emacs ;
+	if [ $? -eq 0 ]; then
+	    echo "OK ...";
+	else
+	    echo "Warning! init.el is not loaded from .emacs. Check if you load init.el";
+	    echo "  Example:  Add the following line ";
+	    echo "       (load \"~/.emacs.d/init.el\") ";
+	    echo "  to $HOME/.emacs";
+        fi
+    fi
+}
+
 _install() {
 	cat $OpenXM_HOME/share/emacs/use-asir-mode-local.txt >>$HOME/.emacs.d/init.el
 }
-
+_check ;
 if [ $# = 0 ]; then
 	echo "Usage: use-asir-mode.sh --local" ; \
+	echo "       use-asir-mode.sh --local-yes" ; \
 	echo "       --use-site-lisp has not been implemented." ; \
 fi
 
 if [ $# = 1 ]; then
 if [ $1 = "--local" ]; then
  _ok_local ; \
+ _install_local ; \
+fi
+if [ $1 = "--local-yes" ]; then
  _install_local ; \
 fi
 fi