xyzzyの使い方が分からぬやし 励ましあえ その10 at SOFTWARE
[2ch|▼Menu]
[前50を表示]
500:名無しさん@お腹いっぱい。
07/04/09 03:32:48 fmN8xezx0
お互いに鰈にスルーしてくれ。
住人はおまいら二人だけぢゃないんだわ

501:名無しさん@お腹いっぱい。
07/04/09 06:35:19 IoWtX0kQ0
むしろ本スレが過疎ってるのが問題じゃないかと。

502:名無しさん@お腹いっぱい。
07/04/09 08:06:58 H+EZqE+w0
だって本スレ難しいんだもん

503:名無しさん@お腹いっぱい。
07/04/10 08:23:42 3w0vgbyG0
>>500
では、あなたがスルーされても回答し続けて下さい。

504:名無しさん@お腹いっぱい。
07/04/10 10:17:50 BULZ+Wk00
>>499
少し使える位だとxyzzyでは
まだ初心者の範疇に張ってしまう場合もあるので
区分が難しいと思うが。

505:名無しさん@お腹いっぱい。
07/04/10 10:20:13 DTdn/NUx0
どこまでが初心者なんだろうな・・・ lisp 書けるかとか?

506:名無しさん@お腹いっぱい。
07/04/10 10:36:54 C4+SM0uw0
初心者・・・自分ではLispかけないけど、なんとなく理解はできる
中級者・・・自分が欲しい機能をバリバリLispで組める
上級者・・・xyzzyの内部構造もしっかり把握してる

こんなかんじ?

507:名無しさん@お腹いっぱい。
07/04/10 20:52:59 ChF/CemR0
何と言う敷居の高さ…
if 文しか書けないよ俺

508:名無しさん@お腹いっぱい。
07/04/10 20:55:19 USQF0Z5s0
いやこんな感じだろう

初心者->とりあえず使ってみようという気力はある
初級者->基本機能は一通り使える。.xyzzyなどもコピペでなんとかできる。
中級者->コピペせずに.xyzzyなどをカスタマイズできる。
    ちょっとしたことならlispでなんとかできる。
上級者->自作lispを書ける
神->xyzzyの中身まで把握。

509:名無しさん@お腹いっぱい。
07/04/10 20:56:10 QpFmkg140
>>506
それだとオレはきっとまだ胎児だ.
初心者以前の赤子とかサルにすらなれていない.

510:名無しさん@お腹いっぱい。
07/04/10 21:25:54 4Qs5fbz70
>506
俺は黄禹錫くらい

511:名無しさん@お腹いっぱい。
07/04/10 21:43:12 cIchCZ4IO
多分、上級者の大部分が神だとおもう。

512:sage
07/04/10 22:07:40 hoHpXBMb0
>>506は厳しすぎな気が。
>>509はアバウト過ぎな気が。

個人的にはいい感じなとこでいい感じのマクロが組める方が上級者かなあ。
ソース読んで中身を把握できるのは確かに神だ。

ところでこのすれは508の云う中級者までが対象?

513:名無しさん@お腹いっぱい。
07/04/11 08:51:26 JJpOdXTV0
テンプレ読む限りはそうかな

514:名無しさん@お腹いっぱい。
07/04/11 10:42:09 i189iuuB0
lispは書く書けないでは分類不可能だよ。
lispを書いても中身のレベル差は雲泥の
違いがあるし。上は果てしない。

515:名無しさん@お腹いっぱい。
07/04/11 10:57:49 pGOfe46bP
とりあえず過去スレからたどると、lispに関する質問は本スレでやれ
ってことだったよね。

516:名無しさん@お腹いっぱい。
07/04/12 02:23:43 y6NzpcWX0
USBメモリにxyzzy入れて使っている人ってメーラは何を使ってる?
出先ではkamail3は使えないと思うのだが

517:名無しさん@お腹いっぱい。
07/04/12 22:40:07 UQIBNYG20
2ch-mode + aborn.l で本文で無用に連続改行されたスレをあぼーん
するにはどう設定すればいいのでしょうか?

XYZZYHOME/.2ch/aborn/aborn.rule で下記のように設定しても
駄目でした。

(thread "板名"
and body "<br> <br> <br> <br>"
)

518:名無しさん@お腹いっぱい。
07/04/12 23:52:40 bqgR2UCl0
エスケープシーケンス使え
つ \n

519:名無しさん@お腹いっぱい。
07/04/12 23:53:58 EiJhstno0
>>517
連続改行は縮める派なので勘ですが。
(thread "板名"
and body "[  \t\n]\\{4,\\}")


520:名無しさん@お腹いっぱい。
07/04/13 00:57:29 +GzjBGBW0
>>518 >>519
どうもです。

下記のようにすると、とりあえず上手くゆきました。

(board "板名"
and body "^[  ]*\n[  ]*\n[  ]*\n\\([  ]*\n\\)+")


521:名無しさん@お腹いっぱい。
07/04/13 14:56:44 1B46IzHV0
タブブラウザみたいにタブをホイールクリックで閉じる設定にしたいのですが
どうすればいいですか?

522:名無しさん@お腹いっぱい。
07/04/13 15:03:52 thWGzwkA0
URLリンク(xyzzy.s53.xrea.com)

523:名無しさん@お腹いっぱい。
07/04/18 12:19:06 BYlHWUz80
モード毎に文字コードを変えたい場合はどうしたらよいでしょうか…

524:名無しさん@お腹いっぱい。
07/04/18 14:39:48 ZzchES030
フック

525:名無しさん@お腹いっぱい。
07/04/19 03:36:35 BE/U/rpG0
適当な文字コードに変えるlispを
必要なモードのフックに。GUIとかじゃ無理
lispを書くのは本スレ行きらしいのでそっちで聞いたら?

526:名無しさん@お腹いっぱい。
07/04/22 15:25:09 S651JMbI0
virtual-file-ftpがよくわからん。
設定ファイルはfuga._ftp でアンダーバーいるんだよね?
find:file d:/xyzzy/fuga._ftp/ でftpに接続してタブで補完されるんだよね?

527:名無しさん@お腹いっぱい。
07/04/22 15:34:43 rcgBZTDp0
>>526
あってるよ。
中身は書いた?


528:名無しさん@お腹いっぱい。
07/04/23 00:53:58 eZ17Na5x0
ファイラで、開いているフォルダに存在するファイルの数を知る方法はありますか?

529:名無しさん@お腹いっぱい。
07/04/23 01:14:58 pyzlMgVr0
>>528
homeキーを押す

530:528
07/04/23 01:52:48 eZ17Na5x0
>>529
うひょーーー、こんなに簡単だったとは……
心からありがとう!

531:名無しさん@お腹いっぱい。
07/04/23 17:07:17 KnG+xDr90
>>527
サーバーに接続出来るようになったのですが、接続先のファイル一覧やディレクトリ
等の情報が取得できないらしくtabで補完されないのは、私の環境の性なのかがわかりません。
仕様でしょうか?


532:名無しさん@お腹いっぱい。
07/04/23 19:07:21 pyzlMgVr0
>>531
なんで一覧が出ないのに接続できてるってわかるの?
こっちはエスパーじゃないんだから最初から最後まではっきり書こうよ。
あと、うちは出来てんだから仕様なわけナス。

勘を働かせまくるとファイヤーウォールの設定とか、pasvとか、かも。

533:名無しさん@お腹いっぱい。
07/04/23 19:42:03 KnG+xDr90
>532
少なくともファイル名を指定すればgetでき、かつC-x C-sで保存できるので
接続は部分的にうまくいっていると思います。問題は
ー補完されていない(tabを叩くとディレクトリ名が無効ですとダイアログが出る)
ということです。ちなみに実在するディレクトリ名を直接打ち込めば、ちゃんと
階層が下のファイルでもダウンロードできます。PFW切っても状態は変わりません。

まぁサーバーの設定なのか、私のPCの設定が問題で仕様じゃないということは分かりました。
設定を見直してみます。

534:名無しさん@お腹いっぱい。
07/04/23 23:32:17 c5x+xWiW0
2ch-modeのスレ一覧で、どれが新着のスレかぱっと見てわかる方法はありますか。
色分けが出来ればよさそうなのですが、そういう変数がないようだったので。

535:名無しさん@お腹いっぱい。
07/04/24 09:04:36 HGybBXXK0
これとか?
;; スレ一覧で更新されたスレを強調表示
(add-hook '*board-show-hook* 'board-update-emphasis)


536:名無しさん@お腹いっぱい。
07/04/24 09:16:13 /Il+COor0
>535
すみません。
前回板を開いたときにはなかったスレを強調表示したいということです。

537:名無しさん@お腹いっぱい。
07/04/24 10:33:10 eukmd3Uh0
KaMailV3に関する質問なんですが、
アーカイブされたメールのうち何もタグ付けされていないものだけを
表示させる方法はありますか

538:名無しさん@お腹いっぱい。
07/04/24 14:25:56 q3HPPigyO
このソフト使ってる人はやっぱり窓使いの憂鬱とかを使って、普段のキー配置もemacs風に変えてるんですか?

539:名無しさん@お腹いっぱい。
07/04/24 18:31:12 vCo3xURM0
>>538
URLリンク(www.cam.hi-ho.ne.jp)

540:名無しさん@お腹いっぱい。
07/04/25 01:22:59 OAI85iQf0
>>537
ない

541:537
07/04/25 10:10:14 UpcErFJT0
>>540
そうですか、ありがとうorz

542:名無しさん@お腹いっぱい。
07/04/25 22:56:43 eQSVQVeM0
2ch-mode + aborn.l で無意味な文字列の繰り返しによる荒らし
を自動アボーンしたいのですが、ヘタレで正規表現がわかりません。

(body "^\s?(.{4,100})\1{3}")

と、aborn_rule に書きましたが、これはでは
下記のようなレスがアボーンされません。

意味のない文字列意味のない文字列
意味のない文字列意味のない文字列
意味のない文字列意味のない文字列
[...]

どうぞよろしくご教示ください。m(__)m

543:名無しさん@お腹いっぱい。
07/04/25 23:08:17 S3hwwqzG0
よし、分かった。こうしろ。

(body "意味のない文字列意味のない文字列
意味のない文字列意味のない文字列
意味のない文字列意味のない文字列 ")

544:名無しさん@お腹いっぱい。
07/04/25 23:30:47 LxTgtFyn0
>>542
ヘタレ以前に
「xyzzyの正規表現はバックスラッシュが2つ要る」
ということを知らないってことは調べる努力すらしてないだろ。
お前のような奴はaborn.ruleにこれでも書いてカエレ。

(body "\\(^.\\{4,100\\}$\\)\\(\n\\1\\)\\{2,\\}")
542も消えるがな。

545:542にあらず
07/04/26 05:30:50 aA/v6+Fx0
ダイアログやミニバッファで正規表現の検索や置換に使う正規表現はともかく、
aborn.ruleの正規表現はいまだにわからん。

グルーピングは\\(\\),\\{\\}だったのか。

試してみよう

546:名無しさん@お腹いっぱい。
07/04/26 12:22:27 qOQTxZbV0
すいませんがxyzzyでは簡単に整形桁幅を変更出来ないのでしょうか?

vimでいつも:set textwidth=...
大体65桁が多いけど、そのつど幅決めて整形しています。

詰込のEsc-qが72桁だと思うのですが、これを自由に変更、もしくは変えたいの
ですが、弄り方がよく判りませんorz

綺麗に整形したいです><
教えて下さい。

547:名無しさん@お腹いっぱい。
07/04/26 12:49:25 qOQTxZbV0
自己解決しました。すまそん。

M-x 65 C-x-fでカラム指定出きるんですね。出来れば最初の行の余白イ
ンデンドとして保って整形してくれるといいなぁと思わなくも無いので
すが、無理なんでしょうか?

vimの整形を見慣れたせいもあるんだと思うのですが、余白インデンド
保ってくれた方が綺麗に見えます。個人的にですが。

そうゆう整形lispとゆうかplug inがあるのかな?ないと出来ないのかも
しれないけど

548:名無しさん@お腹いっぱい。
07/04/26 14:25:27 trKU22zH0
つNetinstaller

549:名無しさん@お腹いっぱい。
07/04/26 14:49:01 pw9t2thV0
>>547
>最初の行の余白インデンドとして保って整形
newline-and-indent
を使うモードのキーマップのRET辺りに設定。
lispとかは殆ど不要唯のキー設定です。

550:名無しさん@お腹いっぱい。
07/04/26 16:08:37 UC9E6A730
>>547
整形する前に、行頭の余白部分にカーソルを置いて
C-x . (set-fill-prefix) でなんとかならないかな。

551:547
07/04/26 17:15:44 qOQTxZbV0
xyzzyでもvimと同じ感じで出来そうな気がしてきました。色々と指定の方法が
あるんですね。色々試してみます。

552:名無しさん@お腹いっぱい。
07/04/27 22:44:35 5H9BtL/c0
文字列を選択するにはどうしたらいいのでしょうか?
shift+→など以外でやる方法はありますか?

553:名無しさん@お腹いっぱい。
07/04/27 23:39:59 m21GnFkO0
>>552
S-F6 あたりでそれっぽいことをしてくれそう

554:名無しさん@お腹いっぱい。
07/04/28 01:00:43 6KyPknga0
F6が必要ですか
ホームポジションの範囲では無理ですかね

555:名無しさん@お腹いっぱい。
07/04/28 01:12:41 IpdbWRyx0
>>522 C-SPCっていうかselectionなんか使ってたらxyzzyのメリットが
相当目減りしてしまうような木がするけど。

556:名無しさん@お腹いっぱい。
07/04/28 02:29:49 mI9lMINJ0
Shift 押しっぱを最初に考えた奴は死ぬべき。

557:名無しさん@お腹いっぱい。
07/04/28 09:51:53 s2tjvMEI0
選択する文字列最初でC-SPC。
M-fやらM-eやらで文字列最後へ
んでもってM-w。
文字で説明すると面倒そうだが覚えればマウスより楽。
なんでもいいがforward-wordの単語区切りは
Emacsよか賢い気ガス

558:522
07/04/28 14:37:15 6KyPknga0
レスありがとうございます

>>555
選択しないで、ある範囲の文字をコピー、切り取り、削除は普通どのように行うのでしょうか?
現在位置から指定した文字までカットM-z 文字
みなさんは↑みたいなショートカットを使っているんですかね

>>557
見事に選択した範囲?というか、マークしたところからカーソルがあるところまで
コピー 切り取り 削除ができました


559:名無しさん@お腹いっぱい。
07/04/28 15:03:31 mI9lMINJ0
M-d 便利だよね

560:名無しさん@お腹いっぱい。
07/04/28 23:19:02 U0+rV8360
>>558
winkey派の自分としてはこんなのとか。

;; セレクションを設定する
(defvar *my-selection-set-separate-char* "   \"()\n。-、、-.‘-】")

(defun my-selection-set ()
(interactive)
(let ((separate-char (compile-regexp
(format nil "[~A]" *my-selection-set-separate-char*))))
(or (not (looking-at separate-char))
(save-excursion (forward-char -1)
(looking-at separate-char))
(forward-char -1))
(if (eq *last-command* 'my-selection-set)
(when (= *last-mouse-click-count* 5)
(goto-virtual-line *last-mouse-line*)
(goto-virtual-column *last-mouse-column*)
(setq *last-mouse-click-count* 0))
(setq *last-mouse-click-count* 1
*last-mouse-line* (current-virtual-line-number)
*last-mouse-column* (current-virtual-column)))
(incf *last-mouse-click-count*)
(mouse-left-press)))

(global-set-key #\M-s 'my-selection-set)

使ってないが、surroundという拡張だともっと高度なことができるらしい。

561:560
07/04/28 23:20:23 U0+rV8360
使い方はM-s連打で。

562:名無しさん@お腹いっぱい。
07/04/29 00:26:32 zbWlJmzT0
セレクションはマークとキルリングを変更せずに削除したいときに使うなあ
最近あんまり使ってないような気もする

563:名無しさん@お腹いっぱい。
07/04/29 00:49:05 /Y+lnri10
しばらく消したくないテキストのコピーに F8 と F9 が結構便利

564:名無しさん@お腹いっぱい。
07/04/29 05:28:31 GBlccvqQ0
>>563
そこでレジスタですよ。結構便利
初期設定がC-x rなので微妙に使い難いけど。

565:名無しさん@お腹いっぱい。
07/04/29 10:07:20 0CDHIgs60
C/C++のソースコードをANSIスタイルで書きたいのですが、どう設定すればいいですか。
デフォルトだとGNUスタイルになってしまいます。

566:名無しさん@お腹いっぱい。
07/04/29 11:57:35 15HxsuV50
おもしろいブログがあるよ
URLリンク(izanagi.iza.ne.jp)

567:名無しさん@お腹いっぱい。
07/04/29 20:09:39 dUpN8EA50
どうしてもcsv-modeで列数の多い(60以上)csvファイルを編集したいんです。
編集ダイアログを表示するときに、各列が全て縦に並んで表示されるので
全ての列を編集することが出来ません。

編集ダイアログの表示を縦一列に全て表示するのではなく、ダイアログの横幅を増やして
2列表示にしたり、スクロールバーを表示してスクロールできるように改造できませんか?


568:名無しさん@お腹いっぱい。
07/04/30 01:53:52 9qajPaLP0
csv-modeは使ったことがないが
普通に編集してはいけないのか?

569:名無しさん@お腹いっぱい。
07/04/30 02:00:10 dkuFpH9N0
列と行が区別できないので、そのまま編集は面倒って話じゃない?

570:名無しさん@お腹いっぱい。
07/04/30 04:10:31 IVpyGQEm0
>>565

ANSIスタイルなんてあったっけ?
K&RとかBSDとかいうスタイルならわかるけど。
いずれにしろ

(setq c-brace-offset -2)
(setq c-indent-level 4)
(setq c-continued-statement-offset 4)
(setq c-argdecl-indent 4)
(setq c-brace-offset 0)
(setq c-brace-imaginary-offset 0)
(setq c-label-offset -2)
(setq c-comment-indent 2)

この辺頑張っていじってみたら?



571:名無しさん@お腹いっぱい。
07/04/30 10:03:53 LqRh82gd0
>>567
書き方がちょっと不明瞭なので、最初何のことを言っているのか分らなかった。

csv-mode の csv-selection-edit-dialog (C-c C-M-e) でダイヤログ編集をする際、
データの列数が多いと、項目が画面からはみでてしまうが何とかならないか、
ということだろうね。

参考画像:
URLリンク(ohkubo.s53.xrea.com)


572:名無しさん@お腹いっぱい。
07/04/30 23:01:02 bWWJVtiX0
>>570
いろいろ弄った結果、ANSIスタイルにできました。
ありがとうございました。

573:名無しさん@お腹いっぱい。
07/05/01 21:45:44 MCOcGzy00
すみません、
選択した文字列の前後に特定の文字列を追加するのは、
どう書けばいいんでしょうか。
たとえば、

やまだ → <b>やまだ</b>

としたいのです。

574:名無しさん@お腹いっぱい。
07/05/01 22:00:09 u9x8TWV70
>>573
こんな感じかな。

(selection-start-end (beg end)
(save-excursion
(goto-char beg)
(insert "string1")
(goto-char (+ end (length "string1")))
(insert "string2")))


575:名無しさん@お腹いっぱい。
07/05/01 22:07:43 S07Y2WKN0
>>574
前から選択と後ろから選択で結果が変わる気が

576:名無しさん@お腹いっぱい。
07/05/01 22:11:24 u9x8TWV70
>>575
あー、そのとおり。
beg と end の値を比べる必要があるね。


577:名無しさん@お腹いっぱい。
07/05/01 22:39:37 MCOcGzy00
>>574-576
レスありがとうございます!
これを(global-set-key #\C-t *** )
で囲めば、Ctrl+tでstring1文字列string2になるんでしょうか?

578:名無しさん@お腹いっぱい。
07/05/01 23:48:25 acPgMKCA0
>>573
html 入力で、そういう機能が欲しいのなら、今はなき
「XYZZY でタグ打ってる人の数→」スレで >>574 より
ちゃんとしたのがあったよ。

(defun quote-region-by-tag (&optional (quotetag ""))
(interactive "*sTag: ") ; s => 文字入力を指示する。
; 入力された文字列は quotetag に割り当てられる。
(setq starttag (string-trim "<>" quotetag))
(setq endtag (substitute-string starttag " .*" ""))
(case (get-selection-type)
((1 2)
(exchange-region-and-selection)))
(let ((begin (mark))
(end (point)))
(when (> begin end)
(let ((tmp begin))
(setq begin end
end tmp)))
(save-excursion
(goto-char end)
(insert "</" endtag ">")
(goto-char begin)
(insert "<" starttag ">"))))

579:名無しさん@お腹いっぱい。
07/05/02 00:36:27 10eMlIrS0
なんとなく短くしてみた

(defun quote-region-by-tag (&optional (quotetag "") begin end)
  (interactive "*sTag: \nr")
  ;; 範囲選択がある場合はそっちを優先
  (if (member (get-selection-type) '(1 2))
      (setq begin (selection-mark) end (selection-point)))
  (when (> begin end) (rotatef begin end))
  (let* ((starttag (string-trim "<>" quotetag))
         (endtag (substitute-string starttag " .*" "")))
    (save-excursion
      (goto-char end)
      (insert "</" endtag ">")
      (goto-char begin)
      (insert "<" starttag ">"))))

580:名無しさん@お腹いっぱい。
07/05/04 12:03:20 ukp3bBm+0
makefile-modeを導入しようと思い、emacs移植キットを入手したのですが
emacs.lをバイトコンパイルしようとすると
「'return-from'のキャッチャが参照できません:nil」
とエラーが表示され導入ができません。
何か特殊な組込方があるのでしょうか?
ちなみに、elisp.lはコンパイルできました。

581:名無しさん@お腹いっぱい。
07/05/04 21:33:52 uBVV0nGn0
>>580
emacs.l を一度ロードしてからコンパイルしたらできたよ

582:名無しさん@お腹いっぱい。
07/05/05 16:07:27 0qEdJRDs0
xyzzyでUnicodeのBMP面以外(U+10000以上)を、正常に表示できないのですが、
未対応なのですか?

583:名無しさん@お腹いっぱい。
07/05/05 18:30:34 ABb5ywrd0
そういうのは本スレにでも。

584:名無しさん@お腹いっぱい。
07/05/07 18:47:33 zQZ25L9A0
xyzzyの検索機能の拡張でemacsのoccurに相当する物はないのでしょう
か?

あいまいなのですが、ディレクトリ指定、ファイル指定出きるとさらに
嬉しいです。でもカレントバッファのみでもいい。該当箇所に飛んで欲
しい・・・です。






585:名無しさん@お腹いっぱい。
07/05/07 19:48:54 Ii/PmPds0
>>584
自分で調べる努力をしてくれ。
wikiに同じような質問あったと思うから。


586:580
07/05/07 21:28:16 wcNLBc3y0
>581
ありがとうございました。
ロードしたら問題なくコンパイル通りました。感謝。

587:584
07/05/07 22:14:03 zQZ25L9A0
>>585
すいません。

便利なものは大抵どの環境にもあるものなんですね。vimにもemacsにも
似た物外ありxyzzyでも出来ないかなと思っていたら標準のgrepで出来た
なんて...orz


588:名無しさん@お腹いっぱい。
07/05/13 11:40:44 od+CuTmG0
うぐぅ御所:作ったSoftware置いてます。
URLリンク(www1.bbiq.jp)

ここの packages.lが、取れないのですが取れます?
これって、どこに報告したらいいのか

589:名無しさん@お腹いっぱい。
07/05/13 13:01:13 EEnFJ/Pi0
>>588
> これって、どこに報告したらいいのか
適当なファイル(例えば ahk-mode.zip)をダウンロードすれば、中に
メールアドレスが書いてあるので、そこに報告したらいいと思いますよ。

590:名無しさん@お腹いっぱい。
07/05/14 20:53:16 rUUkBSzI0
こんばんは。
ctagsを使ってタグジャンプをするようにしたのですが、
outline-treeはXTAGSでないと、C言語の関数ツリー表示をしてくれないですよね。
ctagsファイルを利用して同様に表示する方法はないでしょうか。
あと、XTAGSファイルはソースがある各フォルダに作成されますが、
作業終了後に消す必要があるのですが、一括で消す方法はありますか。

591:名無しさん@お腹いっぱい。
07/05/15 21:42:36 IO+M0LZ90
>>590
find . -name XTAGS -print | xargs rm


592:名無しさん@お腹いっぱい。
07/05/16 04:40:52 AS5vm5sl0
>>590
> ctagsファイルを利用して同様に表示する方法はないでしょうか。
作らないと無い。
誰かが作ったという話は聞いたことが無い。

> あと、XTAGSファイルはソースがある各フォルダに作成されますが、
> 作業終了後に消す必要があるのですが、一括で消す方法はありますか。
xyzzyでやるならファイラにてXTAGSしか消せないように削除マスクを設定して削除。

593:590
07/05/16 10:06:43 R9uCrJF40
>>591,592
ありがとうございました。
参考にしてみます。
当面は、ctagsでタグジャンプして
アウトラインや補完用にXTAGSを作って
最後にXTAGSを消すようにしようと思います。

594:名無しさん@お腹いっぱい。
07/05/17 02:08:25 sCw0E+TK0
質問させてください。(元Meadow使いです)
C-jにはnewline-and-indentが割り当てられていますが、
if (a == b) {ここ!
でC-jしても次の行のカーソル位置が2文字右になりません。
ifのiと同じ位置です。

そこでnewline-and-indent2を作りたいのですが、
各メジャーモード(C,C++,JAVA,Ruby,Lispなど)でも通用するようにするには
どう書けば良いでしょうか?

#なんか(setq indent-tabs-mode nil)しても
#lisp-modeの(indent-region)で平気でTAB入れやがるので
#各モードの統一が取れてなさそうな気がする。。。

595:名無しさん@お腹いっぱい。
07/05/17 03:29:14 nC5YUU+f0
>>594
RETじゃだめですか?
それぞれのモードでちゃんとインデントする改行が
割り当てられてると思うんですが。

>#なんか(setq indent-tabs-mode nil)しても
それをそのまま.xyzzyに書いてませんか?
*lisp-mode-hook*に引っ掛けるか、
lisp-modeにしたあと手動でnilにするか、
*lisp-indent-tabs-mode*をnilにするかしないと駄目ですよ。多分。


596:名無しさん@お腹いっぱい。
07/05/17 10:20:33 U3HZm8TK0
>>594
こんなのとか?
(setf (aref *kbd-translate-table* 10) #\RET)

597:594
07/05/17 17:53:21 sCw0E+TK0
>>595 >>596
レスありがとうございました。
C-jの件は体をC-mにカスタマイズすることにします。
元々C-mだったのをMeadowでC-jにしたのですが。。。

indent-tabs-modeは
setqではなくsetq-defaultにしたら解決しました。
お騒がせしました。

598:名無しさん@お腹いっぱい。
07/05/18 17:29:23 s6UvKaSt0
WindowsのショートカットはCTRL
その他Emacs風ショートカットはCapsLockで使いたいと思っているのですが
これを綺麗に設定するにはどのようにすればいいのでしょうか?


599:名無しさん@お腹いっぱい。
07/05/18 20:39:15 IcwjfKKf0
>>598
両方CTRLにしちゃう,というのじゃだめ?

600:599
07/05/18 20:45:36 IcwjfKKf0
CapsLockと刻印されたキーをCTRLにしちゃう,っていう意味ね.

601:名無しさん@お腹いっぱい。
07/05/18 20:55:12 l+maYPzR0
>>598
キー入れ替えソフトやレジストリの書き換えで、CapsLockを左Ctrl,左Ctrlを右Ctrlにして、
C-x,C-c,C-vとかに割り当てる関数で右か左を判定して振り分けてみたら?

602:名無しさん@お腹いっぱい。
07/05/18 22:33:43 rb9IrQO/0
mayu使って

window XYZZY /xyzzy\.exe:*/ : Global
mod mod0 -= 英数 # globalでの設定解除
mod control -= LControl
mod control += 英数
key *英数 = *LControl
key *LControl = *英数
mod mod1 = !!!LControl
key M1-X = C-Delete # cut
key M1-C = C-Insert # copy
key M1-V = S-Insert # peast
key M1-*S-Z = C-*S-ReverseSolidus # undo

こんな感じにしてる。

603:名無しさん@お腹いっぱい。
07/05/21 00:46:33 a4oTN1kP0
質問です。HIEさんのreference.xmlを使う
URLリンク(hie.s64.xrea.com)

を参考にリファレンスを山本さんのinfo.l URLリンク(www1.neweb.ne.jp)
を用いて最新版を見たいと思い、wikiのアーカイブページから
最新のリファレンス(reference070228.lzh)をダウンロードしました。
xmlファイルからtexiを、HIEさんのページで紹介されている
xml2xxx.lzh 2003.07.05版 の中の xml2texi.pl を用いて変換したのち
cygwinのEmacsを用いてM-x texinfo-format-bufferしましたが、
途中 Duplicate node name: verify-visited-file-modtime
と表示され変換が止まってしまいます

理由はおそらく、同じくHIEさんの URLリンク(hie.s64.xrea.com)
の2005/10/02で書かれていることだと思うんですが、
解決になるスクリプトが探しても見つかりません。

環境は
ActivePerl5.8.8.820
(libxml-perlとXML-DOMとそれに関連するものはppm経由なのでおそらくインストール済み)
Emacs21.2.1(cygwin)
で行いました。どなたかよろしくお願いします

604:603
07/05/21 00:53:44 a4oTN1kP0
日本語が変だったのと間違いがあったため改めて書き直させていただきます。申し訳ありません

質問です。HIEさんのreference.xmlを使う
URLリンク(hie.s64.xrea.com)

を参考に最新版のリファレンスを山本さんのinfo.l URLリンク(www1.neweb.ne.jp)
を用いて見たいと思い、wikiのアーカイブページから
最新のリファレンス(reference070228.lzh)をダウンロードしました。
HIEさんのページで紹介されているxml2xxx.lzh 2003.07.05版の中の
ref2texi.pl を用いてxml -> texi に変換したのち
cygwinのEmacsを用いてM-x texinfo-format-buffer として、texi -> info
しようとしましたが、途中 Duplicate node name: verify-visited-file-modtime
と表示され変換が止まってしまいます

理由はおそらく、同じくHIEさんの URLリンク(hie.s64.xrea.com)
の2005/10/02で書かれていることだと思うんですが、
解決になるスクリプトが探しても見つかりません。
改めてよろしくお願いします

605:名無しさん@お腹いっぱい。
07/05/21 09:59:34 KzBR/hCB0
まずは、ネットインストーラ経由で揃えてみては?
infoが駄目ならinfo-modoki-modeとかref-view
でも見れますよ。

606:603
07/05/22 00:13:33 L5aBnnvU0
>>605
レスありがとうございます
info-modoki-mode、ref-viewの存在は知ってはいたのですが、やっぱりinfo-modeが使いたく
質問させていただきました言われたとおりnetinstallerも導入してみましたが、
info.lがwikiの配布パッケージ一覧の中にない状態ではないでしょうか(確認不足?)

HIEさんのreference.xmlを使う URLリンク(hie.s64.xrea.com)
でダウンロードできる reference-xml2xxx-20041115.lzh
に含まれるinfoファイルは問題なく開けていましたし、
YaTeX関連のドキュメントも表示できていましたので、infoの導入ミスではないかと考えています

また へなちょこリファレンスXML関連 内のxy-referenceをnetinstallerで
インストールしましたが、肝心のtexiファイルもしくはinfoファイルへの変換
の関数があるわけではありませんでした
(対応しているのはkwd、txt、html、htmlhelpだと思います)

607:603
07/05/22 00:14:44 L5aBnnvU0
とりあえずほかの方法を探した結果、満足のいくものではないですが一応形にはなったので
方法を残しておきます

上述>>603 >>604のref2texi.pl でできたtexiファイルは正しいものと信じて
texi -> info の方法を、makeinfo(cygwin付属) で行いました
結果は凄まじい数のwarningが表示され、最後に
too many errors . gave up
とでました。ただinfoファイル自体はできていたので
~/infoに移動させ見てみると(当然dirは編集して)
filer、変数索引、関数索引の項を除いてほぼ完成していました(この状態は20070228版の完成品ではないですよね)
とりあえず20041115版と今回の20070228版の両方を入れて補いあうこととしました

wiki の リファレンスのページのコメント欄
URLリンク(xyzzy.s53.xrea.com)
にも今回と同様のことが書いてありますが、残念ながらinfoファイルに関してではないようでした
以上連続投稿、長文失礼しました
なにかありましたら教えてください

608:名無しさん@お腹いっぱい。
07/05/22 07:32:17 bC4t4ds90
>>607
verify-visited-file-modtimeだけが問題ならば、verify-visited-file-modtimeは
関数と変数との2つの項目があると思うので、reference.xmlからそのうちの1つを削除
した上で、>>604の方法でinfoに変換し、その後infoファイルに削除した項目を追加
するというやり方で出来ませんか?

それでもダメなら変換スクリプトを修正するしかないと思います。

609:608
07/05/22 07:44:17 bC4t4ds90
既にここ
URLリンク(xyzzy.s53.xrea.com)
に同じようなことが書いてありましたね。

確かに、項目の一つを削除するよりも一つの項目にマージした方がいいですね。
試していないのは同様です。

610:603
07/05/23 00:27:41 zkUsWUkk0
>>608 >>609
ありがとうございます
>>608 で示されたようにxmlの状態でverify-visited-file-modtimeの項目を
削除することは試していませんが、texiの状態で削除することはやってみました
このときはtexi -> info に関してはエラーは出ず(たぶん)infoファイルが生成されましたが
できあがったものを見てみると、verify-visited-file-modtime以降の項目が
表示されなくなってしまいました

ただしクロスリファレンス(でしたっけ?)、xml、texiの構造を理解していないまま
単純に一項目にあたりそうな部分を削除しただけでしたので、やりかたが不十分だったのかもしれません
変換スクリプトの修正はperlをこれまた理解していないので、できそうにありません
できればえらい人がwikiあたりにつづけてくれたらありがたいのですが・・・
時間に余裕ができたらxmlのファイルを眺めて>>608 で指摘された方法を試してみたいと思います


611:名無しさん@お腹いっぱい。
07/05/23 05:56:48 Bbnym0tI0
>>610
こちら
URLリンク(www5f.biglobe.ne.jp)
のref2xxx.zipでも変換できるようですね(こちらの方が新しいようです)。

612:603
07/05/24 01:20:07 jgYMnNH60
>>611
まさに求めていたのはまさにこれです。readmeにかいてあるように
--no-validateオプションを使えば前のスクリプトでもできたのかもしれませんが
とにかくうまくいきました。ありがとうございます

後のために実践したものを書いておきます
1 >>611 のページからref2xxx.zipをダウンロード、解凍(あとはreadmeに従うだけなのですが一応)
2 ref2texi.plをreference.xml(wikiのアーカイブあたりからとってくる)のあるディレクトリにいれる
3 perl ref2texi.pl (コマンドプロンプトとかで)
そもそもActivePerlとかcygwinのPerlとかが必要、Jcodeも必要。入れてなければ先にインストール
 texiファイルができたことを確認したら
4 makeinfo --no-validate reference.texi
 これにもTexinfotoolsとかcygwinのmakeinfoとかが必要。--no-validateオプションを付けないと
 too many errors!と出て止まるっぽい
5 できたinfoファイルを~/infoに移動させ、~/info/dirを編集してinfo-modeで確認
おそらく以上です


613:603
07/05/24 01:33:01 jgYMnNH60
連続でごめんなさい
また日本語が変になっていますが

補足です
cygwinのmakeinfoを使う場合はnkfなどで文字コードをeuc-jpに一旦変える必要が
あるかも知れません。infotoolsのときは問題なくできたのですが、cygwinでは最初すぐには
うまくいかなかったのでいろいろ試しているあいだにやった気がします
問題なければいいのですが、こういう可能性もあるかもということで
改めて確認する元気はないので以上です。みなさんありがとうございました

614:名無しさん@お腹いっぱい。
07/05/25 13:52:49 tDHUPbnJ0
横に長い行と、短い行が混在するテキストを開いているとき、
短い行にキャレットがいると、
右スクロールさせようとしても短い行の最後の文字までしかスクロールできません。

Windowsのメモ帳だと、どの行にキャレットがいたとしても
横に長い行の最後の文字まで右スクロールできるのですが、
xyzzyでもこのようにできる方法はないでしょうか?

615:名無しさん@お腹いっぱい。
07/05/25 13:58:11 hYlDMZyu0
普通にはない
但し無理やり短い行に無理やり空白を入れることで代用はできるはず

616:614
07/05/25 14:06:06 tDHUPbnJ0
>>615
レスありがとうございます。
無理矢理空白を入れていって、キャレットが別の行に移ったときなどは
その空白を削除という感じでしょうか。
多少めんどうな感じですね。。

617:名無しさん@お腹いっぱい。
07/05/25 15:04:01 hYlDMZyu0
見つけたこれだ
URLリンク(hie.s64.xrea.com)

618:614
07/05/25 16:07:56 tDHUPbnJ0
>>617
ありがとうございます。
確かにこれを使ってフリーカーソルが実現できました。

ただ書き忘れていたのですが・・・水平スクロールバーを使って
マウスドラッグしたときもフリーカーソルのように横スクロール
させたいのです。
先ほどのスクリプトを改造するしかないのかなぁ。

619:名無しさん@お腹いっぱい。
07/05/25 17:02:43 jMi0/RbnP
>>614
俺も横スクロールできないのが不便だと思ってた。
でも、結局最長カラムに合わせて行末に空白を追加するぐらいしか
対策がないかな。保存する前に行末の空白を削除って感じで。
めんどいけど。

620:名無しさん@お腹いっぱい。
07/05/25 17:29:01 j7KjJ0ih0
すみませんが、質問です。
2ch-mode で、oysterログインをするには、どうしたら良いでしょうか?
oysterのアカウントは持っていて、EmacsのNavi2chなどで使っています。

621:名無しさん@お腹いっぱい。
07/05/25 21:45:41 RzkZvMAd0
>>620
tterm 内で emacs を開く

622:名無しさん@お腹いっぱい。
07/05/27 21:57:48 cCA7aI8a0
質問です。
LISPに慣れていないので質問がおかしいかも知れませんが、

$s = "abcdefg";
substr($s, 1, 2, "12");
で "a12defg"と簡単に文字列変換できますが、
lispではどのようにするのでしょうか?






623:名無しさん@お腹いっぱい。
07/05/27 22:22:23 OQYNr1Kw0
>>622
substitute-string を関数リファレンスで調べてください

624:名無しさん@お腹いっぱい。
07/05/27 22:30:11 ICmGKPFb0
>>622
質問自体でなく質問する板またはスレがおかしい。

(setq a "abcdefg")
して
(substitute-string a "bc" "12")
または
(concat (substring a 0 1) "12" (substring a 1))
あたりだと思うけど。

625:名無しさん@お腹いっぱい。
07/05/27 22:35:27 2d1FGXdx0
例題の感じだとこんなのかな。
(replace "abcdefg" "12" :start1 1 :end1 3)


626:名無しさん@お腹いっぱい。
07/05/27 23:47:17 cCA7aI8a0
ありがとう 625の方法でうまくいきました。
>>623-625

あと、 "a" x 10 のような関数はありますか? "aaaaaaaaaa"

LISPの逆引き本があれば買いたいです。




627:名無しさん@お腹いっぱい。
07/05/28 00:10:17 CNJ0MIl30
板違いだからこれで最後ね。
(make-sequence 'string 10 :initial-element #\a)
or
(format nil "~V@{~A~:*~}" 10 "a")

> LISPの逆引き本があれば買いたいです。
xyzzy-lisp であれば、xyzzy wiki で "reference" で検索すれば
見つかるよ。


628:名無しさん@お腹いっぱい。
07/05/28 00:18:01 YRgfwRnG0
>>626
lisp スレいけよボケ。
xyzzy は clisp だぞ。

629:名無しさん@お腹いっぱい。
07/05/28 01:17:53 VdphVnq70
逆引き本って言うか、
普通にxyzzyのreference眺めてれば分かりそうに思えるけどね。
MSDNとか見たいに糞重いと何か違うヘルプがほしいと思うけど
xyzzyのreferenceは良く出来てると思う。日本語だし。

630:名無しさん@お腹いっぱい。
07/05/31 22:32:43 kB6Cqel80
2ch-mode使いの方に質問です。
板を開いたときにどうやって新着スレを見分けていますか?

631:名無しさん@お腹いっぱい。
07/06/01 01:59:24 7ZN7sQt60
>>630
これ
URLリンク(xyzzy.s53.xrea.com)


632:名無しさん@お腹いっぱい。
07/06/02 09:47:57 k1sWfXFd0
>>630
config.lの

;; スレ一覧で更新されたスレを強調表示
(add-hook '*board-show-hook* 'board-update-emphasis)

でやってたんだけど、なんか重いんだよなあ。開いて数秒固まることもあるし。
さくさくっと表示してくれるいい方法があれば、自分も知りたい。

633:名無しさん@お腹いっぱい。
07/06/02 09:54:56 PSexnMmK0
>>632
navi2chだと簡単に色分けできるんですんけどね。
色関連はemacsと違って難しいのかもしれませんね。

634:名無しさん@お腹いっぱい。
07/06/02 12:37:40 KYx9aeWQ0
>>631
2ch::tbk-x-aborn が見つからないとか出た。


635:名無しさん@お腹いっぱい。
07/06/02 13:14:44 aGSAjw7T0
>>634
aborn.lを入れるといいよ
URLリンク(homepage3.nifty.com)

636:名無しさん@お腹いっぱい。
07/06/03 12:18:24 ddO536ge0
>>635
ありがとう。動いたです。


637:名無しさん@お腹いっぱい。
07/06/09 23:35:47 m1AeoPo20
text-modeでdescribe-key M-sすると、
「M-s runs the command center-paragraph」て出ませんか?
でも実際にM-sてすると、re-search-forwardが出てきませんか?

638:名無しさん@お腹いっぱい。
07/06/10 00:13:25 ueyJwzFC0
>>637
うちでもそうなった。
実際は、center-paragraph は M-S(M-s ではない) にバインドされているみたいだ。


639:名無しさん@お腹いっぱい。
07/06/10 04:47:36 jijq+zfc0
ちょっと調べてみた
(lookup-keymap (cdadr *text-mode-map*) #\S) => center-paragraph
(lookup-keymap (cdadr *text-mode-map*) #\s) => nil
(lookup-keymap *text-mode-map* #\M-S) => center-paragraph
(lookup-keymap *text-mode-map* #\M-s) => center-paragraph

lookup-keymapはビルトインなのでお手上げ。

640:名無しさん@お腹いっぱい。
07/06/12 23:58:42 s5lEOgU10
eb.l 0.2 バイトコンパイルできた人いる?
変数が定義されていません: *ebdict-dictionary-title* って
怒られるorz
宣言されているんだけどな〜


641:名無しさん@お腹いっぱい。
07/06/13 05:45:53 tm++b0uo0
そもそも、そのtest-modeってのは何?

642:名無しさん@お腹いっぱい。
07/06/13 13:37:16 EAcJCY0s0
そんなのないよ。

643:名無しさん@お腹いっぱい。
07/06/13 14:11:54 bg38g0TV0
>>640
一回eb.lをeval-bufferしたあとは?


644:640
07/06/13 22:05:07 MzRJmMNT0
>>643
できました!ありがとうございます。
でも何でだろ?
もしかして、バッククオート構文内で使ってる変数だからかな?

645:名無しさん@お腹いっぱい。
07/06/14 01:55:13 s0Sz3nUN0
単に変数の宣言が読み込まれてないだけじゃないのか。

646:名無しさん@お腹いっぱい。
07/06/16 12:23:09 M93eEhzl0
fortran-modeで保存できないんですけど何故でしょうか?

647:名無しさん@お腹いっぱい。
07/06/16 15:42:13 Hh5J6g2i0
それだけじゃ分からん。 M-x toggle-trace-on-error ぐらいしれ

648:名無しさん@お腹いっぱい。
07/06/17 07:29:02 7iRofdAu0
>>646
何かエラーとかでないのか?
どういう操作したとか。

649:名無しさん@お腹いっぱい。
07/06/17 07:48:37 nh+tEoDw0
「toggle-trace-on-error」でググれば>>647 の言ってることも何やればいいかもわかるけど、
テンプレに↓みたいな文があるといいかもしれんと思った。


「○○を導入して△△という操作をしたら××というエラーが起こった」という情報だけでは
問題が解決しない場合、以下の手順を行ってください。

.xyzzy の先頭行に以下の1文を記入し、xyzzyを再起動します。
(toggle-trace-on-error)

エラーを再現させると *Trace Output* というバッファーにエラーが出力されます。
質問する際は、その内容を添付することをお勧めします。


……ここまで書いて思ったのだが、ログ見て回答できる人って初心者とは言いがたい……
本スレで聞いてもらうのがいいのかなぁ

650:646
07/06/17 08:45:01 2XFXoE8J0
説明が下手ですいません。
ファイルを編集後fortran-modeで上書き保存しようとしてもできないんです。
エラーメッセージも出ません。
そのまま、fundamentalに戻すと保存できてしまいます。

651:646
07/06/17 09:27:26 2XFXoE8J0
自己解決できました。

652:名無しさん@お腹いっぱい。
07/06/17 12:47:50 l1Y4gF6j0
自己解決した場合は同じ症状の人のために解決方法も書いていってね。

653:名無しさん@お腹いっぱい。
07/06/17 13:13:22 4PNX4SJs0
>>649
初心者はどっちに書いていいかすら分からない(かもしれん)けど、
回答できる人は両方とも見てる。
だから次回からテンプレにいれていいのでは?>>652も。

654:名無しさん@お腹いっぱい。
07/06/17 18:03:59 xJfWpuWW0
hippie-exp.elに似たlispどこかにありますか?
listの補完はどうすればよいでしょうか

655:名無しさん@お腹いっぱい。
07/06/25 07:25:52 VwDKN5+T0
複数行のセレクションをTabキー押したらまとめてインデントさせたいのですが
どうすればいいですか?

656:名無しさん@お腹いっぱい。
07/06/25 12:50:48 BvhBPiT40
>>655
insert-tab-bol-selectionでググれ

657:名無しさん@お腹いっぱい。
07/06/25 18:25:56 Fmxt0CPx0
hippie-exp.ってのがファイル名補完だけでいいなら
補完系統のlispを探せばあるよ。

658:名無しさん@お腹いっぱい。
07/06/26 05:17:20 8Y9JrZgq0
印刷するときに "改ページ文字" を入力することはできますか?
例えば

1
2
\p
3

とあれば自動的に「3」を2ページ目に出力するような事をしたいです。

659:名無しさん@お腹いっぱい。
07/06/26 08:32:36 CHNjv2j30
改ページ(制御)コード = FF(form feed) = Ctrl-L(0x0c)
入力: C-q (文字コード)
表示: ^L
または
M-x control-code-dialog-box

660:名無しさん@お腹いっぱい。
07/06/26 11:00:03 8Y9JrZgq0
>>659
まさにその物があったのですね。
ありがとうございます.

661:名無しさん@お腹いっぱい。
07/06/27 07:20:10 lmWTckdJ0
>>656
返事遅れましたがTHX
期待通りの動きそしてくれます。
Shiift+TABでTAB削除させようといろいろいじくってみましたが
Lispそのものがよくわからなくてまいりました。
どなたかヒントくださいませんか?

662:名無しさん@お腹いっぱい。
07/06/27 16:41:16 QD2FNtl00
>>661
TAB 挿入の逆をやりたいだけなら
矩形選択(CTRL 押しながらドラッグ)して削除するのが一番簡単だと思う。

663:名無しさん@お腹いっぱい。
07/06/28 00:17:33 JVabdrRJ0
>>661
URLリンク(xyzzy.s53.xrea.com)

664:名無しさん@お腹いっぱい。
07/06/28 02:24:32 y0roCKvk0
2ch-mode,実況用にタイマーが欲しい

665:名無しさん@お腹いっぱい。
07/06/28 03:02:21 qfrkH3Ar0
>>664

どんなの?

666:名無しさん@お腹いっぱい。
07/06/28 03:27:47 y0roCKvk0
30秒規制を回避したいだけなので、前回の自分の投稿から何秒経ったのかが分かればいいです。
「29秒しか経ってないから、もうちょっと待て」というのにゲンナリしているので。

datのfile-write-timeとget-universal-timeの差分が30秒超えたかどうかわかればいいのかな?

667:名無しさん@お腹いっぱい。
07/06/28 10:22:37 jg6nOE/F0
ctags.lを使ってタグジャンプをしてるのですが、
ジャンプ候補が複数存在する場合、ポップアップ表示により選択しています。
これをXTAGSを使用したタグジャンプのように、ダイアログ表示により選択する
ことは可能でしょうか?
ctags.lを弄ってみたのですがlispが今ひとつ勉強不足でうまく動作しません・・・

668:656
07/06/28 16:19:47 AzIOWLkm0
>>661

私が使っている関数です。
(defun delete-tab-bol-selection ()
"行頭のタブを削除"
(interactive "*")
(when (member (get-selection-type) '(1 2))
(ed::map-selection #'(lambda (start end)
(save-restriction
(narrow-to-region start end)
(goto-char (point-min))
(replace-buffer "^\t" "" :regexp t))))))



次ページ
最新レス表示
スレッドの検索
類似スレ一覧
話題のニュース
おまかせリスト
▼オプションを表示
暇つぶし2ch

4997日前に更新/235 KB
担当:undef