From b21d410d4ed805f2e2e1ad94240ba41e55dedb05 Mon Sep 17 00:00:00 2001 From: nobu Date: Thu, 17 May 2007 08:02:02 +0000 Subject: * misc/ruby-style.el (ruby-style-label-indent): for yacc rules. git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@12289 b2dd03c8-39d4-4d8f-98ff-823fe69b080e --- misc/ruby-style.el | 15 +++++++++++---- 1 file changed, 11 insertions(+), 4 deletions(-) (limited to 'misc') diff --git a/misc/ruby-style.el b/misc/ruby-style.el index 1768789470..e0ed41fbc9 100644 --- a/misc/ruby-style.el +++ b/misc/ruby-style.el @@ -4,18 +4,25 @@ (defun ruby-style-case-indent (x) (save-excursion (goto-char (cdr x)) - (if (looking-at "\\") - (- c-basic-offset - (% (current-column) c-basic-offset))))) + (if (looking-at "\\") '*))) + +(defun ruby-style-label-indent (x) + (save-excursion + (goto-char (cdr x)) + (backward-up-list) + (backward-sexp 2) + (if (looking-at "\\") '/))) (require 'cc-styles) (c-add-style "ruby" '("bsd" (c-basic-offset . 4) + (tab-width . 8) + (indent-tabs-mode . t) (c-offsets-alist (case-label . *) - (label . *) + (label . (ruby-style-label-indent *)) (statement-case-intro . *) (statement-case-open . *) (statement-block-intro . (ruby-style-case-indent +)) -- cgit v1.2.3