Newsgroups: fj.editor.emacs
Path: galaxy.trc.rwcp.or.jp!sparky!uunet!ccut!sh.wide!cc-keio!cs-keio!fukumoto
From: fukumoto@aa.cs.keio.ac.jp (FUKUMOTO Atsushi)
Subject: Re: Help: intelligent toggle between Japanese/English input mode
In-Reply-To: ishikawa@ds5200.personal-media.co.jp's message of 3 Apr 92 13:14:47 GMT
Message-ID: <FUKUMOTO.92Apr8212333@lyra.aa.cs.keio.ac.jp>
Sender: news@sync.cs.keio.ac.jp
Nntp-Posting-Host: lyra.aa.cs.keio.ac.jp
Organization: Anzai Lab., Keio Univ., Yokohama, Japan.
References: <ISHIKAWA.92Apr3221516@ds5200.personal-media.co.jp>
Distribution: fj
Date: Wed, 8 Apr 1992 12:23:33 GMT
Lines: 29
Xref: galaxy.trc.rwcp.or.jp fj.editor.emacs:3007
X-originally-archived-at: http://galaxy.rwcp.or.jp/text/cgi-bin/newsarticle2?ng=fj.editor.emacs&nb=3007&hd=a
X-reformat-date: Mon, 18 Oct 2004 15:18:22 +0900
X-reformat-comment: Tabs were expanded into 4 column tabstops by the Galaxy's archiver. See http://katsu.watanabe.name/ancientfj/galaxy-format.html for more info.


In article <ISHIKAWA.92Apr3221516@ds5200.personal-media.co.jp>,
ishikawa@ds5200.personal-media.co.jp (Chiaki Ishikawa) writes:
> $B!J(BTeX $B$O$"$^$jCN$j$^$;$s$,!"(BNemacs $B$r;H$C$F(B $BF|K\8lHG$N(BTeX $B$r;H$C$F$$$k(B
> $B$R$H$O!"$b$C$HF~NO$,BgJQ$J$s$8$c$J$$$+$H>!<j$KA[A|$7$F$^$9!#$=$l$H$b(B
> "\" $B$rF~NO$7$?$i1Q8l%b!<%I$KLa$k$H$$$&$h$&$J(BTeX $B%b!<%I$,$9$G$K$"$k$N$G(B
> $B$7$g$&$+!)(B $B$I$&$b(B roff$B7O$O$"$H$+$iMh$?(BTeX$B$K2!$5$l5$L#$N$h$&$G;DG0$G$9!#(B)


$B!!<B:]$?$$$X$s$J$N$G!";d$O0J2<$N$h$&$J%3!<%I$r;H$C$F$$$^$7$?!#(B 


(defun leave-egg-mode-and-self-insert (arg)
  "turn off egg-mode and self insert"
  (interactive "*p")
  (if (and egg:*mode-on* egg:*input-mode*) (toggle-egg-mode))
  (self-insert-command arg))

(if (fboundp 'egg-self-insert-command)
    (setq TeX-mode-hook (function
 (lambda ()
                           (define-key TeX-mode-map "\\" 'leave-egg-mode-and-self-insert)
                           (define-key TeX-mode-map "{" 'leave-egg-mode-and-self-insert)
   (define-key TeX-mode-map "$" 'leave-egg-mode-and-self-insert) ) ) ) )



$B!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!J!K\!w0B@>E7Ln8&(B.$B7W;;5!2J3X@l96(B.$B7D1~Bg(B
$B!!!!!!!!!!!!!!!!!!!!!!!!!J$3$N%"%+%&%s%H$O$^$b$J$/>CLG$9$k!J$H;W$&!K!K(B
