[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[mule-cgreek:00775] Re: coptic
$B9b66$G$9!#(B
>>>>> Shinsuke Kawazoe <skawazoe@xxxxxxxxxxxxxxxxx> writes:
>> $B$3$l$O(B CGreek -> TLG -> Convert Buffer (Region) $B$HF1$8$h$&$J$3$H$r(B TeX
>> $B$K4X$7$F9T$&$H$$$&$3$H$G$9$h$M(B? $B%^%K%e%"%k$K=q$-K:$l$F$$$^$7$?(B ($B$9$0(B
>> $B$KDI2C$7$^$9(B) $B$,!"8=:_$G$b(B
>>
>> M-x tex-to-cgreek-buffer
>>
>> $B$G2DG=$G$9!#$3$l$b%a%K%e!<$K$"$C$?J}$,JXMx$G$9$+(B?
> $B$=$&$G$9$M!#(BCGreek --> TeX --> Convert Buffer(Region) to greek font
> $B$H$$$C$?$b$N$O$"$C$?$i=i?4<T$K$H$C$F$OJXMx$G$7$g$&$M!#(B
$B$G$ODI2C$7$^$7$g$&!#(B
>> $B=c?h$K<ALd$J$N$G$9$,!"$J$<%U%!%$%kFI$_9~$_$N:]$K(B CGreek -> Open File
-> TeX Format $B$r;H$o$J$$$N$G$9$+(B? $B:G=i$+$i(B TeX $B7A<0$H$7$FFI$_9~$a$PLd(B
>> $BBj$O$J$$$h$&$K;W$o$l$k$N$G$9$,!#(B
> $B%"%O%O!#$D$$(B C-x C-f $B$H$d$C$F$7$^$C$F$$$^$9!#<+J,$NJ8=q$O$[$H$s$I(BTeX
> $B$G$9$,$9$Y$F$NJ8=q$K%.%j%7%"8l$r4^$s$G$$$k$o$1$G$O$J$$$+$i$G$7$g$&$M!#(B
> $B$H$K$+$/%^%&%9$r;H$o$J$$$?$a$K$O!"(Bcgreek-find-file-tex $B$KJL$N%-!<%P(B
> $B%$%s%I$r3d$jEv$F$M$P$J$i$:!"$=$N$3$H$,(B C-x C-f $B:.Mp$7$=$&$J$N$G$M(B
> $B!J<+J,$GH?>J$7$F$_$k$H!K!#$=$l$KBP$7$F!"J]B8$NJ}$O$I$3$+$GCm0U$7$F0U(B
> $B?^E*$J$N$G%-!<%P%$%s%I$rJQ99$7$F$bLdBj$J$$$h$&$K46$8$F$$$k$o$1$G$9!#(B
$B$D$^$j%^%&%9$r;H$&$h$&$J=i?4<T$K$H$C$F$O:#$N$^$^$G$b$$$$$o$1$G$9$M!#(B
$B0lJ}(B C-x C-f $B$r;H$&$h$&$J?M$O!"$?$H$($P(B
----------------------------------------------------------------------
(defun tex-to-cgreek-latin1-buffer nil
(tex-to-cgreek-buffer)
(tex-to-latin1-buffer))
----------------------------------------------------------------------
$B$HDj5A$7$F$*$$$F!"(Btex-to-cgreek-latin1-buffer $B$r2?$+$N%-!<$K3d$jEv$F$k(B
$B$H$$$&$N$O$I$&$G$7$g$&$+!#(B
$B$"$k$$$O0J2<$N%W%m%0%i%`$r(B ~/.emacs $B$KF~$l$F$*$/$H!"!V%U%!%$%kL>$,(B.tex
$B$G=*$o$j!W$+$D!V%U%!%$%kCf$K(B \begin{greek} $B$H$$$&J8;zNs$,B8:_$9$k!W>l(B
$B9g$N$_!"<+F0E*$K(B TeX $B%3%^%s%I$r(B Latin-1 $BJ8;z!&%.%j%7%"J8;z$KJQ49$9$k$h(B
$B$&$K$J$j$^$9!#(B
----------------------------------------------------------------------
(defun kawazoe-find-file nil
"Perform tex-to-cgreek-buffer when *.tex file contains `\\begin{greek}'."
(and
(string-match "\\.tex$" (buffer-file-name))
(save-excursion
(goto-char (point-min))
(search-forward "\\begin{greek}" nil t))
(or (tex-to-cgreek-buffer) t)
(or (tex-to-latin1-buffer) t)
(set-buffer-modified-p nil)))
(add-hook 'find-file-hooks 'kawazoe-find-file)
----------------------------------------------------------------------
>> > $B<!$O!"Jl2;O"B3$rHr$1$k$?$a$N>J2;(B(elision)$B$H$7$F$N%"%]%9%H%m%U$K4X$9(B
>> > $B$k$3$H$G$9!#!J$3$NE@!"%^%K%e%"%k$K$O5-:\$,$J$$$H;W$$$^$9!K(B
>>
>> > $B$7$$$b$N$G$O$"$j$^$9$M!#FC$K!"(B(1)$B$O%.%j%7%"8l$G(B di $B$HBG$C$?8e$K!!(B'$B$H(B
>> > /$B$N$I$A$i$rBG$C$F$b%"%/%;%s%H$,$D$$$F$7$^$$$^$9$+$i!"(Blatin-1$B$KJQ99$7(B
>>
>> $B!V(Bd i C-q '$B!W$"$k$$$O!V(Bd i C-q /$B!W$GBg>fIW$G$9!#$3$l$b%^%K%e%"%k$KDI2C(B
>> $B$7$J$/$F$O$J$j$^$;$s$M!#(BLatin-1 $BF~NO$G$O$?$H$($P!V(Be C-q '$B!W$NBe$o$j$K(B
>> $B!V(Be ' '$B!W$HBG$C$F$b$$$$$h$&$K$7$F$"$j$^$9!#%.%j%7%"J8;zF~NO$G$bF1$8$h(B
>> $B$&$K$9$k$Y$-$+$b$7$l$^$;$s!#(B
> $B$=$&$G$9$M!#$=$NJ}K!$O0l4S$7$FK>$^$7$$$h$&$K;W$$$^$9!#(B
$B<B8=$9$k$N$OC1$K<j4V$@$1$NLdBj$G$9$N$G!";~4V$,$G$-$?$i$d$C$F$_$^$9!#>-(B
$BMh$N(B Unicode $BHG$G$OF~$l$k$h$&$KEXNO$7$^$9!#(B
>> $B$3$NJU$O!":#;H$C$F$$$k(B WinGreek $BJ8;z%;%C%H<+BN$NITHw$N$h$&$J5$$,$7$^$9!#(B
>> $B%.%j%7%"J8;z%U%)%s%H$G%"%]%9%H%m%U$r=q$3$&$H$9$k$H!"5$B)5-9f$H$7$F$N(B
>> rough $B$"$k$$$O%"%/%;%s%H5-9f$H$7$F$N(B acute $B$rN.MQ$;$6$k$rF@$^$;$s$+$i!#(B
$B<:Ni!"(Brough $B$G$O$J$/$F(B smooth $B$G$7$?$M!#(B
>> # $B$H$3$m$G(B Unicode $B$K$O(B greek psili (smooth breathing) $B$H$OJL$K!"$=$l(B
>> # $B$H7A$,$=$C$/$j$J(B greek koronis $B$H$$$&5-9f$,MQ0U$5$l$F$$$^$9!#$b$7$+(B
>> # $B$7$F$3$l$,%"%]%9%H%m%U$G$9$+(B?
> $B<j85$NJ8K!=q$G$O!"(Bkoronis$B$H$$$&$N$OM;2;(B(crasis)$B$K$*$$$FMQ$$$i$l$k%"(B
> $B%]%9%H%m%U$N$h$&$J5-9f$G$9$M!#Nc$($P!"(Bto\ o)/noma -> tou)/noma $B$K$J(B
> $B$k>l9g$N%"%]%9%H%m%U$N$3$H$N$h$&$G$9!#$3$l$,(Belisio$B$N>l9g$N%"%]%9%H%m(B
> $B%U$HF1$8$h$&$K;H$($k$N$+$I$&$+$O(BUnicode$B$rCN$i$J$$$N$GJ,$+$j$^$;$s$M!#(B
$BB?J,0c$&$h$&$J5$$,$7$^$9!#(BUnicode $B$N4pK\;Q@*$O!V7A$,;w$F$F$b0UL#$N0c$&(B
$B$b$N$O6hJL$9$k(B ($B$?$@$74A;z$OJL(B)$B!W$G$9$+$i!#(B
>> $B$^$9!#%H!<%U$r(B1$B8D(B *scratch* $B$K%3%T!<$7$F!"$=$NA0$K!V(B(char-charset ?$B!W!"(B
>> $B$=$N8e$m$K!V(B)$B!W$r2C$($FA4It$G(B
>>
>> (char-charset ?$B""(B)
>>
>> $B$H$7!"JD$8%+%C%3$ND>8e$G(B C-j $B$rBG$D$H$I$&$J$j$^$9$+(B?
> ascii
> $B$H$G$^$9$M!#$d$O$j!"JQ$G$9$+!#(B
ascii $B$H$J$k$3$H$O$"$jF@$^$;$s!#%/%(%9%A%g%s%^!<%/$H%H!<%U$N4V$K6uGr$,(B
$BF~$C$F$$$k$N$G$O$"$j$^$;$s$+(B? $BN><T$OL)Ce$5$;$F2<$5$$!#(B
--
TAKAHASHI Naoto
Electrotechnical Laboratory, Japan
ntakahas@xxxxxxxxx
http://www.etl.go.jp/~ntakahas/