[xyzzy:04363] Re: undo について

[YAMAMOTO Taizo <ymtz@xxxxxxxxxxxxxxx>]

やまもとたいぞうです。

>(let ((opoint (point)))
>  (delete-region
>   (progn (goto-bol) (point))
>   (progn (goto-eol) (point)))
>  ...
>  (undo)
>  (goto-char opoint))
>
>とか。

やはり、そうやって予めポイントを取得しておくしかないのですね。
(progn (insert "*") (delete-backward-char))
のように、実際には何の効果もないけどundoのヒストリに残るよう
なものがあるかと期待したのですが、、、

というわけで、処理の前にポイントを保存しておいて、
undoしたらそのポイントに飛ぶようにしてみます。

----
    YAMAMOTO Taizo / 山本 泰三
        mailto:ymtz@xxxxxxxxxxxxxxx
        mailto:yamamoto@xxxxxxxxx
        http://www1.odn.ne.jp/ymtz/