[xyzzy:04303] Re: 複数行のタブの挿入

[Tetsuya Kamei <kamei@xxxxxxxxxxxx>]

林さん、こんにちは。

    Tue, 14 Mar 2000 19:23:35 +0900 の
   “[xyzzy:04300] Re: 複数行のタブの挿入”
    への返事です.

| 　(defun shift-selection (&optional (column (tab-columns)))

あー、バッファローカルのことを全然考えてませんね(^^;
そのうち直します。

| (defun shift-selection (&optional (column (tab-columns (select-buffer))))

惜しい。selected-buffer です。

| 　また、良ければ、現在のregionに対して、shiftするようにする方法も
| 教えていただけるとうれしいです、ただこっちの方は自分でもう少しがん
| ばってみようかなとも思っておりますので、もし良ければヒントなど ^^;

ヒントだけってのも難しいですね(^^;

    (selection-start-end (start end)

こいつで現在の選択の位置を取ってきているので、代わりに
現在の region を start と end に入れてやればおっけー。

      (goto-char end)
      (forward-line 1)
      (start-selection 1 pre)
      (goto-char start))))

この辺は選択し直しているだけなので不要です。

--
亀井哲弥(Tetsuya Kamei)
kamei@xxxxxxxxxxxx/JCA00343@xxxxxxxxxxx