レス数が950を超えています。1000を超えると表示できなくなるよ。

Emacs part3

20 ：名無しさん＠Ｅｍａｃｓ ：01/12/07 12:42

>>19
シャレだけど。
(progn
(defadvice end-of-line (before rememer-this-point ())
(push-mark))
(ad-activate 'end-of-line))

マークが増えすぎて実用的ではない。

21 ：名無しさん＠Ｅｍａｃｓ ：01/12/07 12:47

>>20
> マークが増えすぎて実用的ではない。

だよなあ、一瞬考えたんだけど。
でも >>19 の状況って結構あると思わん？
適当にあたりをつけて C-u 20 C-b とかかな。

22 ：名無しさん＠お腹いっぱい。 ：01/12/07 12:48

==2==C==H======================================================

　　　　　　　　　２ちゃんねるのお勧めな話題と
　　　　　ネットでの面白い出来事を配送したいと思ってます。。。

===============================読者数：81300人　発行日：2001/11/22

どもども、ひろゆきですー。
日本生命の削除依頼公開スレッドを用意しましたのでお知らせしますー。

http://news.2ch.net/test/read.cgi/newsplus/1004597354/

「仮処分の決定と削除依頼とは違うじゃーん」とか「ひろゆきって粘着？」なんて声もありますが、
大きなお世話ですー。。。(￣ー￣)ニヤリ

おいらのことを訴えようなんて考えてる方々は、よーく考えた方がいいですよー。
２CHは削除しようとあがけばあがくほど被害が拡大する仕組みになっているんですー。
(￣ー￣)ニヤリ

おいらは２CHやってても全然儲からないけど、削除してもらう為においらにひれ伏す連中を
見ると、なんだか凄い権力者になったような気がして気持ちいいんですー。
今までの悲惨な人生（ドテチン時代）を忘れさせてくれるくらい気持ちいいんですー。
でも、裁判所なんかにいく奴はちょっと気に入らないな、、、
そういう奴は哀れな日本生命のように懲らしめてやりますんで、皆さんも気をつけた方が
いいですよー。。。(￣ー￣)ニヤリ

んじゃ！

23 ：20 ：01/12/07 13:17

マークはやめてレジスタにしてみた。

でもレジスタってこういう使い方していいの？
よく知らんので。
(progn
(defun my-remember-last-point ()
(interactive)
(jump-to-register ?e))
(define-key global-map [(control ?c) (control ?e)]
'my-remember-last-point)
(defadvice end-of-line (before my-remember-point ())
(set-register ?e (point-marker)))
(ad-activate 'end-of-line))

あとキーバインドも識別子も適当。かなり。

24 ：名無しさん＠お腹いっぱい。 ：01/12/07 13:44

>>23
というか変数に覚えとけばいいんでないかい？
動作確認はしてないです。

(progn
(defvar my-remember-point nil)
(defun my-remember-last-point ()
(interactive)
(and my-remember-point (goto-char my-remember-point)))
(define-key global-map [(control ?c) (control ?e)]
'my-remember-last-point)
(defadvice end-of-line (before my-remember-point ())
(setq my-remember-point (point-marker)))
(ad-activate 'end-of-line))

read.cgi ver5.26+ (01/10/21-)