[Date Prev] [Date Index] [Date Next]
[Thread Prev] [Thread Index] [Thread Next]

[xyzzy:04665] tabify について



どうも、林です。xyzzyはとても重宝しています。
ただLISPで書きたいことは沢山あるのですが、自分の技量が追いついてい
ません。

ただ、最近気になっていたのが、タブの幅を2にしたところ、tabifyがう
まく効かなかったので、cmds.lを変更してみてうまく直りましたが、ここ
をこのようにかえてどのように影響が出るかが分かりません。
以下のようにコメント部分を変えたのですが

-----cmds.l-----

(defun tabify (from to)
  (interactive "*r")
  (save-excursion
    (save-restriction
      (narrow-to-region from to)
      (goto-char (point-min))
      (let ((indent-tabs-mode t))
    (declare (special indent-tabs-mode))
;   (while (scan-buffer "[ \t][ \t][ \t]+" :regexp t)
    (while (scan-buffer "[ \t][ \t]+" :regexp t)
          (goto-char (match-end 0))
          (let ((column (current-column)))
            (delete-region (match-beginning 0) (match-end 0))
            (indent-to column))))))
  t)

------eof------

このように変更していて良いのでしょうか。どうかご教授下さい。

よろしくお願いします。
-- 
--------------------------------------------
(株)インテック  システム事業本部
        データウェアシステム部
  開発グループ     林 雅大  (Masahiro.H)
         e-mail: hayashi@xxxxxxxxxxxxxx
 〒136-8637 東京都江東区新砂 1-3-3
 TEL (03)5665-5137  FAX (03)5665-5186
--------------------------------------------
                             (_ _) ZZZzzz....

Index Home