From: nobu.nakada@...
Date: 2002-03-03T11:52:36+09:00
Subject: [ruby-list:34166] Re: ruby-mode.el の字下げのカスタマイズ

なかだです。

At Sat, 2 Mar 2002 12:21:04 +0900,
shukaku@j-mac.co.jp wrote:
> できることならjava-modeのように、"("の後に複数の空白があれば、それを次
> の行に反映させるようにしてみたかったんですが、まだ勉強不足でした。^^;
> 
> # function(   arg1,
> #             arg2 )  ←こんな感じ。

こんな感じ。(setq ruby-skip-spaces-after-open-parenthesis t)す
れば空白をとばしてインデントします。

どっちがよいかはたぶん人それぞれのような。私は"()"の内側には空
白を置かないのでどっちでも関係ないですが。


Index: ruby-mode.el
===================================================================
RCS file: /cvs/ruby/src/ruby/misc/ruby-mode.el,v
retrieving revision 1.48
diff -u -r1.48 ruby-mode.el
--- ruby-mode.el	2002/02/18 05:17:53	1.48
+++ ruby-mode.el	2002/03/03 02:31:08
@@ -68,6 +68,9 @@
 (defvar ruby-mode-abbrev-table nil
   "Abbrev table in use in ruby-mode buffers.")
 
+(defcustom ruby-skip-spaces-after-open-parenthesis nil
+  "Non-nil means spaces after open parenthesis are skipped.")
+
 (define-abbrev-table 'ruby-mode-abbrev-table ())
 
 (defvar ruby-mode-map nil "Keymap used in ruby mode.")
@@ -367,6 +370,10 @@
 		(goto-char (point))
 		)
 	       ((looking-at "(")
+		(when ruby-skip-spaces-after-open-parenthesis
+		    (forward-char)
+		    (skip-syntax-forward " ")
+		    (setq pnt (point)))
 		(setq nest (cons (cons (char-after (point)) pnt) nest))
 		(setq pcol (cons (cons pnt depth) pcol))
 		(setq depth 0)


-- 
--- 僕の前にBugはない。
--- 僕の後ろにBugはできる。
    中田 伸悦