Emacs part12

今臭 · NG

今日も秀丸の起動から一日が始まります。
各種 Emacs 関連はこちらで。

Emacs part11 (前スレ)
http://pc3.2ch.net/test/read.cgi/unix/1075033822/

emacs撲滅委員会
http://pc3.2ch.net/test/read.cgi/unix/1073293910/

**名無しさん＠お腹いっぱい。** · NG

>>452
(defcustom inhibit-default-init nil)
だから可能性は低いな…。

一応疑ってみ>>449。

**名無しさん＠お腹いっぱい。** · NG

non-nil の場合に inhibit だよ

**名無しさん＠お腹いっぱい。** · NG

>>451

＞.emacs の一番下に (message "test") と入れて再起動したら "test" が表示される
＞これで .emacs がロードされているかどうかを確認する

表示されます。.emacsはロードされているようです。

＞(setq default-frame-alist
＞'((font . "yourfont")))
＞の式だけ残して再起動してもダメ。
＞起動後に load-file .emacs すると表示される

今まで、(set-default-font "フォントセット名")としていました。
これでは起動時には読まれず、load-file時に読んでくれます。

＞(setq-default default-frame-alist
＞'((font . "yourfont")))
＞にしてもダメかい？

(set-default-font "フォントセット名")をやめてその方法にすると、
一回目の起動時に読んでもらえました。
上手く行きました。
ありがとうございました。

>>指導してくださった皆さん
ご迷惑をおかけしました。
ありがとうございました。

**名無しさん＠お腹いっぱい。** · NG

ごめん、勘違いしてた。

**名無しさん＠お腹いっぱい。** · NG

例えば、text-mode などで、M-x show-images とすれば
画像が表示されるようにしたいのですが、
画像はemacs内でどのようにして表示すればいいのでしょうか？

**名無しさん＠お腹いっぱい。** · NG

>>457
ttp://www.netlaputa.ne.jp/~kose/Emacs/iimage.html
を参考にするとか使うとか。

**457** · NG

>>458
情報さんくすです。
インラインイメージは結構簡単にできるものですね。
text-propertiesにdisplayとイメージプロパティを加えるだけ、みたいな。

ところでiimage.elで
file://c:/foo_dir/foo.png や
[[c:/foo_dir/foo.png]]、<c:/foo_dir/foo.png>
を表示させると、

file://c:

という文字列が残ってしまうのですが、これなんとかならないかな…。

**457** · NG

[[c:/foo_dir/foo.png]]、<c:/foo_dir/foo.png>
の場合、
[[c:
<c:
が残ってしまいます。windowz用には書かれてないのかな？

**451** · NG

>>455
できたんね。よかったね。
次は、同じような質問されたら答えてあげてください。

**名無しさん＠お腹いっぱい。** · NG

> emacs -e wl

などとしたときに，-e オプションを指定されたかどうかを
after-init-hook で調べる事は可能ですか？

**名無しさん＠お腹いっぱい。** · NG

command-line-args

**名無しさん＠お腹いっぱい。** · NG

GNU Emacs 21.3.1 を使っています。

メニューバーの幅を調整するのはどうすれば良いのでしょうか?
デフォルトだと、ちょっと太くていやなので。

それから、XEmacs のように、Shirt + Space でリージョン指定
する際に、選択範囲を反転させて表示させるにはどうすれば良い
のでしょうか?

XEmacs 21.4 から Emacs 21.3 への移行中なのです。

**名無しさん＠お腹いっぱい。** · NG

Shirt + Space?

**名無しさん＠お腹いっぱい。** · NG

>>464
> リージョン指定する際に、
> 選択範囲を反転させて表示させる

(setq transient-mark-mode t)

# GNU Emacs 21.3.1 は使ってないからわからないけど

**464** · NG

>>465
ごめん。Control + Space の間違いだ。

**464** · NG

>>466
> (setq transient-mark-mode t)

thx. それでバッチリでした。

**名無しさん＠お腹いっぱい。** · NG

>>468
Setting this variable directly does not take effect;
use either M-x customize or the function `transient-mark-mode'.

**名無しさん＠お腹いっぱい。** · NG

>>464
直接幅を指定するんじゃないのですが、ここ
ttp://www.anonymization.net/http://www.sodan.org/~knagano/emacs/emacs21.html
に出てるやり方で、.Xresourcesの中でフォントを小さくしたりマージンをせばめれは
幅も狭くなるのではないでしょうか？

**464** · NG

>>470
ありがとうございます。~/.Xdefaults に

Emacs.pane.menubar.*.margin: 0

と書くことで、希望通りの幅になりました。
.emacs では設定できないんでしょうかねぇ。

**名無しさん＠お腹いっぱい。** · NG

~/.emacs で

(cond (window-system
(set-face-font 'default "-misc-fixed-medium-r-normal--14-*")))

としてフォントを設定しているのですが、C-x 5 2 した時に生成される
新しいウィンドウ側にはこのフォントの設定が反映されないようです。
C-x 5 2 で生成されるウィンドウも全く同じフォントで表示させるには
どうすれば良いですか? Emacs 21.3 です。

**名無しさん＠お腹いっぱい。** · NG

default-flame-alist あたりの設定で可能かも。

**451** · NG

>>472
C-x 5 2 は make-frame-command
生成されるのはフレームであってウィンドウじゃない。

.emacs の他の部分とか、環境とかが分からないから何とも言えないけど
フレームのコトだから >>473 が言っているように
default-frame-alist でイケるんじゃない。

>>451も参考に。

**472** · NG

>>473, >>474
適切なコメントありがとうございます。>>451 を参考に
.emacs に以下のように記述してみました。

(cond (window-system
　　　 (setq initial-frame-alist
　　　　　　 (append
　　　　　　　'((width . 80) (height . 54) (top . 0) (left . 600))
　　　　　　　initial-frame-alist))
　　　 (setq default-frame-alist
　　　　　　 (append
　　　　　　　'((width . 80) (height . 54) (top . 0) (left . 600)
　　　　　　　　(font . "-misc-fixed-medium-r-normal--14-*"))
　　　　　　　default-frame-alist))))

これで C-x 5 2 した時のフォントとウィンドウサイズ
(フレームサイズか) が同じになりました。ありがとうございました。

このスレは親切ですね。感謝。

**名無しさん＠お腹いっぱい。** · NG

誰か自分の好きなパケットを作って目的ホストに送れる
「パケット・ジェネレーション mode」をemacs lispで作ってくれないかなー。
それがあれば、ネットワークのテストが簡単にできそう。
他のツールはなんか自動化もできないし、エディターもへなちょこだし
時間がかかってしまう。

**名無しさん＠お腹いっぱい。** · NG

>>476
シェルスクリプトを書いて M-! とかで呼んだ方が早いんじゃない？

**名無しさん＠お腹いっぱい。** · NG

ごめん、
>好きなパケットを作って
か。

**名無しさん＠お腹いっぱい。** · NG

folding-modeどうも不安定なんだが，使うコツとかありますか？
同じような機能のelは他にないかな？

**名無しさん＠お腹いっぱい。** · NG

>>476
DLPI 使うとか、Raw ソケット使うとかで簡単に書ける
(仕事で日常的に使ってる) けど、なぜ emacs lisp ?

**名無しさん＠お腹いっぱい。** · NG

>>480
でもその方法だとかなりローレベルなプログラムを
組むようになるでしょ？俺が想像してたのは、そのローレベルな作業を
もっとハイレベルに視覚的に編集するためのユーザーインターフェース。
そんなelispがあれば簡単にいろいろなフラグとかseq/ack numberを
変更してネットワークのテストが可能になるでしょ？
そしてelispだったらemacs上で自分の好きなように簡単カスタマイズが可能
だからね。

**480** · NG

>>481
うーん。俺は C でネットワークプログラミングのお仕事
してるもんで、インタラクティブに好みのパケットを作って
送受信できるツールを書いて使ってるんだけど、確かに
Emacs Lisp 使いだと、そーゆーのを C で書くのは大変だ
ってことになるかもね。

ただ、それを「誰か」に期待するのは難しいのではないかと。
その手のツールをわざわざ Emacs Lisp で書く人がいるのか
なぁ? という気がする。

ごめん。なんの参考にもならんコメントで。

**481** · NG

> >>481
> うーん。俺は C でネットワークプログラミングのお仕事
> してるもんで、
いやー面白そうだね。

> ただ、それを「誰か」に期待するのは難しいのではないかと。
俺もちょっくら探してみたんだけど、やっぱりないみたい。
結構時間かかりそうだけど、自分で書いてみるとするかなー。

誰か、それっぽいelisp見つけたら教えてください。

**名無しさん＠お腹いっぱい。** · NG

mlterm 上の emacs(-nw) で半角カナ文字が「?」で置換されます。
これを半角カナのまま表示する場合、何を設定すればいいのでしょうか。

X 上の emacs では半角カナが表示されます。(~/.Xresources でフォント指定。)
mlterm 上で、

$ lv 半角カナを含むファイル

すると半角カナが表示されます。(~/.mlterm/(v)font でフォント指定。)

mlterm 2.8.0
emacs 21.3

**名無しさん＠お腹いっぱい。** · NG

>>484
(set-terminal-coding-system 'iso-2022-7bit-ss2)

**484** · NG

>>485

できました。 ~/.emacs に

(if (not window-system) (set-terminal-coding-system 'iso-2022-7bit-ss2))

を追加してから、$ emacs -nw で起動。適当な全角カタカナを入力後、

M-x japanese-hankaku-region

にて半角に変換し、表示できることを確認。

thx! :)

**名無しさん＠お腹いっぱい。** · NG

Emacs の次のリリースはまだか(ﾟДﾟ)ｺﾞﾙｧ!! もう1年以上おしめを取り替えていない、そんな気分。

**名無しさん＠お腹いっぱい。** · NG

cvs

**名無しさん＠お腹いっぱい。** · NG

>>486
unless つかったら？

**名無しさん＠お腹いっぱい。** · NG

>>487
某MLでの半田さんの発言＠2004.10.28
|> Emacs 21.4 はいつごろ出るか教えて下さい。
|まだ当分（数か月以上）かかりそうです。

**名無しさん＠お腹いっぱい。** · NG

CVSだとcompile.elがjdeでうまく動かないのは家だけ？(しかたないから古いのに入れ換えて使ってる。)

**名無しさん＠お腹いっぱい。** · NG

>>491
M-x report-emacs-bug しろよ

**名無しさん＠お腹いっぱい。** · NG

mhcのgemcalで項目をクリックすると
gemcal:259:in `initialize': undefined method `signal_connect' for 3:Fixnum (NoMethodError)
from /usr/bin/gemcal:496:in `new'
from /usr/bin/gemcal:496:in `open_sch_edit'
from /usr/bin/gemcal:472:in `initialize'
from /usr/bin/gemcal:468:in `call'
from /usr/lib/site_ruby/1.8/mhc-gtk.rb:516:in `signal_connect'
from /usr/lib/site_ruby/1.8/mhc-gtk.rb:516:in `call'
from /usr/bin/gemcal:689:in `main'
from /usr/bin/gemcal:689
と表示されて落ちます。ruby1.8ではgemcalは動かないのでしょうか？

スレ違いですか？

**名無しさん＠お腹いっぱい。** · NG

mhcのruby部分だからスレ違いとは思うけど、
とはいえどこにいったら?という感じだね。

**名無しさん＠お腹いっぱい。** · NG

例えば、 foo-one、foo-two、 foo-three ... などの変数がすでに定義してあると仮定
して、

;; こんな感じの関数です
(defun test (number value)
(interactive)
(setq foo-「Numberの値」 value))

(test 'one 1)
(test 'two 2)

のように引数の値をシンボルの一部として使用できる関数を作りたいのですが、
それを行うにはどのようにすれば良いでしょうか？

**名無しさん＠お腹いっぱい。** · NG

intern とか

**名無しさん＠お腹いっぱい。** · NG

>>496
はい、internはfuncall と共に使用したことがあるのですが、
それを使用して
(setq foo-「Numberの値」 value)
と同じ動作をする方法が思いつきません。何かありますか？
(setq (intern (concat "foo-" number)) value)
だとエラーがでてしまう (マクロで先に (intern (concat "foo-" number)) を
substituteする必要があるのかな？)。

**名無しさん＠お腹いっぱい。** · NG

(set (intern...

**名無しさん＠お腹いっぱい。** · NG

(setq sym val sym val ...)
The symbols sym are variables; they are literal (not evaluated).
って書いてありますね。 setの場合は反対にsymが評価されるんですね。
ちなみに、どうしてもsetqでやりたいんだったら
(defmacro test-macro (number value)
`(setq ,(intern (concat "foo-" number)) ,value))
のようにできるな、とさっき思いつきました

**名無しさん＠お腹いっぱい。** · NG

(setq
って
(set (quote
だから。

**織田信長** · NG

　　　　　　　_,,,,,,,,　　　　　　
　　　　 , - ' ﾞ　　　｀` ‐ 、_,,,,,
　　　,r'　　　　　　　　　／＝ミ
　　/　　　　　　　　　　　彡ll',''´
.　/ 　　　　　　　　　　　彡lll
　!-- .､　　　 ,､､､､,,,　　彡lﾉ
　l,,,,,__　/　　　___　　　 'r''ﾞヽ
.　|`ﾞ'' ./　　　`'ﾞ'''"　　　 .〉,l |
　|. 　 ,'　　　　　　　　　　//
.　',.　,'　　　　　　　　 ,　r'
.　ﾞ,　ﾞ'ｰ　‐`　　　　　l　 |
　　ﾞ､''ﾞ ,,､二''‐　　　ﾉ　 l、
''''''''7'ヽ　 '''　　　　／　　/`〉｀ﾞT''''''''''
　　l　　` ､,,,,､- ' "　　　 / /.| 　|
.　 |　 |　 .l i　　　　　　 / ./ | 　|
　 |　 |　　| l　　　　　 / ./　.|　 |
.　|　 |　　 | l　　　　/　/　 |　 |
　|　 |　　　| ',　　　/　/　　l 　.l

**名無しさん＠お腹いっぱい。** · NG

xemacsもここで良いんでしょうか？

**名無しさん＠お腹いっぱい。** · NG

どぞー

**名無しさん＠お腹いっぱい。** · NG

http://penguin.s4.xrea.com/imgboard/img-box/img20041102221903.jpg
↑の所の文字が出ないのです。直し方教えて下さい。

**名無しさん＠お腹いっぱい。** · NG

ちゃんと日本語で説明しろ。(笑
メニューバーに文字が表示されないんだそうな。
XEmacs。バージョン不明。OS不明。configureオプション不明。

たぶん、お使いのOSまたはディストリ(どうせLinuxだろ?)がよろしくしてる
はずの設定が機能してないんだろうから、ディストリのスレへGO!

**名無しさん＠お腹いっぱい。** · NG

>>504
すげぇ分かりやすかった。感動した。

**名無しさん＠お腹いっぱい。** · NG

ここ最近、画像に手書き文字で説明する人を
よく目にするが、同一人物か？

**名無しさん＠お腹いっぱい。** · NG

必死でAAを駆使して説明する人の方が萌える

**名無しさん＠お腹いっぱい。** · NG

赤い丸の中に黒いごみが在るけど何ね？

**名無しさん＠お腹いっぱい。** · NG

Emacs でアンチエイリアスを使うことはできますか?
mlterm 上で emacs -nw ってのはナシで。

**名無しさん＠お腹いっぱい。** · NG

>>511
メニューだけならできるが、本文ですると記号の判断難しいから無理だな

**名無しさん＠お腹いっぱい。** · NG

>>510
konsole 上で emacs -nw

**名無しさん＠お腹いっぱい。** · NG

>>510
Carbon Emacs で

**名無しさん＠お腹いっぱい。** · NG

emacs21とxemacs21って何が違うんでしょうか。

**名無しさん＠お腹いっぱい。** · NG

文字数

**名無しさん＠お腹いっぱい。** · NG

MHCの事で質問したいのですが、ここでも良いでしょうか?
# MHC自体のスレは発見できませんでした

**名無しさん＠お腹いっぱい。** · NG

>>516
>>493-494 みたいだしいんでない?

**516** · NG

>517
ありがとうございます。ではお言葉に甘えて……。

Mew+MHCを使おうとしてます。
Mewの設定は終わり意図通りに動いたのですが、mhcが起動してくれません。

(1)Emacsを起動
(2)Mewを起動
(3)C-c.でMHCの起動

としても(3)で何も起動してくれません。+inboxのバッファが表示されたまま
です。C-c.でMHCが起動し、通常通り使えるようにしたいのですが、何を設定
すれば良いのか分かりません。現在のMHC関連設定・環境は別に投稿します。

**516** · NG

以下、現在の設定です。(上では間違えてageてしまいました。すみません)

# 動作環境
Emacs 21.3.1, mew 4.0.65, mhc 0.25 + snapz (checkout from cvs)

# .emacs内でmew, mhcに関連したもの
(autoload 'mew "mew" nil t)
(autoload 'mew-send "mew" nil t)
(autoload 'mhc-mew-setup "mhc-mew")
(add-hook 'mew-init-hook 'mhc-mew-setup)
(add-hook 'mew-summary-mode-hook 'mhc-mode)
(add-hook 'mew-virtual-mode-hook 'mhc-mode)
(add-hook 'mew-message-hook 'mhc-misc-hdr-decode)
(setq mhc-base-folder "+schedule")
(setq mhc-mail-path (expand-file-name "/home/onor/Mail"))

# mew を起動して"C-c."した直後の*Messege*バッファで
# mewとmhcに関連したもの
Loading 50mew-beta (source)...done
Loading 50mhc (source)...done
Loading mew...done
Setting up Mew world...
Loading mhc-mew...done
Loading mule-util...done
Loading byte-opt...done
Initializing MHC icons...done
Updating status...done
Setting up Mew world...done

# 関連ファイルとディレクトリ構成
~/Mail, ~/Mail/schedule, ~/.schedule, ~/.emacs

**名無しさん＠お腹いっぱい。** · NG

viper 使ってたりしない？

**名無しさん＠お腹いっぱい。** · NG

>>519
> Loading 50mew-beta (source)...done

板違い Linux 板へ Go!

**名無しさん＠お腹いっぱい。** · NG

>>521
http://life5.2ch.net/hage/

**516** · NG

>519
Linux版ってEmacs関連のスレありましたっけ。

>520
いえviperは使っていません。
globalなkey設定は(load "term/bobcat")、SKKくらいだと思います。

**名無しさん＠お腹いっぱい。** · NG

>>514
http://xemacs.org/About/XEmacsVsGNUemacs.html

**名無しさん＠お腹いっぱい。** · NG

>>519
Emacs-21.3.50, mew-4.1.50, MHC CVS HEAD で試してみました。

> cat ~/tmp/.emacs
(autoload 'mew "mew" nil t)
(autoload 'mhc-mew-setup "mhc-mew")
(add-hook 'mew-init-hook 'mhc-mew-setup)
(setq mew-icon-directory "/usr/local/lib/emacs/etc/Mew")

> emacs -q -no-site-file -l ~/tmp/.emacs

M-x mew
C-c..

で MHC がちゃんと起動します。
*Message* バッファはこの通り。
Loading mew...done
Setting up Mew world...
Loading mhc-mew...done
Loading advice...done
Loading byte-opt...done
Initializing MHC icons...done
Updating status...done
Setting up Mew world...done
Scanning 2004/11...done

もしかして mhc/emacs/Makefile で MEW_OPTS = --with-mew を指定しないで
コンパイル・インストールしてるとか?

**名無しさん＠お腹いっぱい。** · NG

emacs マンセー
ブラウズ -> emacs-w3m with emacs-wget
2ch -> navi2ch with monafont
mp3再生 -> mpg123 using mpg321
メール -> mew
文書作成 -> yatex
辞書 -> sdic

**名無しさん＠お腹いっぱい。** · NG

isearch -> migemo
im -> skk

これさえ使えればいい

**526** · NG

yatexは思ったより便利ですよ...
入力補間とか、emacs上でtex -> dviに変換して外部ビューア呼び出して表示できるので楽です。

**名無しさん＠お腹いっぱい。** · NG

俺はauctex に馴染んじまったからな。
一時期yatex使ってみたけど結局aucにもどりますた。

**名無しさん＠お腹いっぱい** · NG

>> 517, 518, 519
C-c. で '.' が一個足りないような。

**名無しさん＠お腹いっぱい。** · NG

Emacs 21.3.50ってCVS HEADのことですか? それともどこかで切り出されて
tarballが置いてあるの?

**名無しさん＠お腹いっぱい。** · NG

HEAD

**名無しさん＠お腹いっぱい。** · NG

何年か前にyatexから素のlatex-modeへ移行してしまった。
そんなに不便なものでもない。

**名無しさん＠お腹いっぱい。** · NG

Emacsを英語で発音するときは先頭にアクセントを置いてイーマックs、でいいんでしょうか?
Emacs FAQにも書いてないし……どこかにwavファイルでもあるといいんですが(^^;

**名無しさん＠お腹いっぱい。** · NG

>>534
http://www.catb.org/~esr/jargon/html/E/EMACS.html

**名無しさん＠お腹いっぱい。** · NG

>>534じゃないんですが、そこ見たんですが、
EMACS: /ee´maks/, n.
だって。「エーマクス」てことでしょうか。

**名無しさん＠お腹いっぱい。** · NG

>>536
http://www.catb.org/~esr/jargon/html/pronunciation.html

**名無しさん＠お腹いっぱい。** · NG

>>537
ども、やぱ[イーマクス]てことで。
でもアクセントは[イー]にあるんでつね。
これから正しい英語発音して皆の目を白黒させられる。

**名無しさん＠お腹いっぱい。** · NG

ふつう「イーマックス」だけどね。

**名無しさん＠お腹いっぱい。** · NG

質問デース
C,C++のソースコードを開いたときに予約語や文字列などは色分けが出来るのですが、
定数(数字)は色分けで出来ないのでしょうか。

**名無しさん＠お腹いっぱい。** · NG

rms の講演を聞いたことがあるが
「いーまくす」だったよ。

**名無しさん＠お腹いっぱい。** · NG

えまっくすじゃダメですか？

**名無しさん＠お腹いっぱい。** · NG

だめです。

**名無しさん＠お腹いっぱい。** · NG

英語に促音はありません。

**名無しさん＠お腹いっぱい。** · NG

>>542
> えまっくすじゃダメですか？

「えまっくす」という呼び方は、
むかし
nemacs
demacs
などが幅を効かせている時期に、
「えぬいーまっくす」「でぃーいーまっくす」
では呼びにくいので
「ねまっくす」「でまっくす」
と呼ぶようになったあたりから出ていると思う。

**名無しさん＠お腹いっぱい。** · NG

んてまっくす

**名無しさん＠お腹いっぱい。** · NG

似てまっくす

**名無しさん＠お腹いっぱい。** · NG

emacsよりもnitが好きでした。

**名無しさん＠お腹いっぱい。** · NG

>>540
すごーくアホなやり方(他に「正しい」やり方があるかもしんない)。
正規表現に頭使ってないので、誤認とか余裕でありまくるけども。

(defface my-face-numeric '((t (:foreground "light sea green"))) nil)
(defvar my-face-numeric 'my-face-numeric)
(defadvice font-lock-mode (before my-font-lock-mode ())
(font-lock-add-keywords c-mode
'(
("\\<[0-9]+\\>" 0 my-face-numeric append)
)))
(ad-enable-advice 'font-lock-mode 'before 'my-font-lock-mode)
(ad-activate 'font-lock-mode)

**名無しさん＠お腹いっぱい。** · NG

.emacsの中でのキーマップで、goto-lineを"\C-="に割り当てたいんですが、
"\C-"の後に来る文字は、アルファベットじゃなきゃいけないんですか？
(global-set-key "\C-=" 'goto-line)
でエラーになるのですが。

**名無しさん＠お腹いっぱい。** · NG

(global-set-key [(control =)] 'goto-line)

**名無しさん＠お腹いっぱい。** · NG

>>551
ありがとうございました。