diff options
| author | nobu <nobu@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2007-09-20 19:58:41 +0000 |
|---|---|---|
| committer | nobu <nobu@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2007-09-20 19:58:41 +0000 |
| commit | ac907e669a4cb0cbaf23651fec30008e7f294049 (patch) | |
| tree | d0fbcf872992b1d5daf055b903fe811ce83f68ad /misc/ruby-style.el | |
| parent | 9c6ff18f6cfcec8185fa94afb4d34630463f9237 (diff) | |
* misc/ruby-style.el (ruby-style-label-indent): fix for function top
level labels.
git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@13478 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
Diffstat (limited to 'misc/ruby-style.el')
| -rw-r--r-- | misc/ruby-style.el | 26 |
1 files changed, 23 insertions, 3 deletions
diff --git a/misc/ruby-style.el b/misc/ruby-style.el index e0ed41fbc9..609c7509ba 100644 --- a/misc/ruby-style.el +++ b/misc/ruby-style.el @@ -1,5 +1,22 @@ ;;; -*- emacs-lisp -*- +;;; +;;; ruby-style.el - +;;; ;;; C/C++ mode style for Ruby. +;;; +;;; $Author$ +;;; $Date$ +;;; created at: Thu Apr 26 13:54:01 JST 2007 +;;; + +(defconst ruby-style-revision "$Revision$" + "Ruby style revision string.") + +(defconst ruby-style-version + (progn + (string-match "[0-9.]+" ruby-style-revision) + (substring ruby-style-revision (match-beginning 0) (match-end 0))) + "Ruby style version number.") (defun ruby-style-case-indent (x) (save-excursion @@ -9,9 +26,12 @@ (defun ruby-style-label-indent (x) (save-excursion (goto-char (cdr x)) - (backward-up-list) - (backward-sexp 2) - (if (looking-at "\\<switch\\>") '/))) + (condition-case () + (progn + (backward-up-list) + (backward-sexp 2) + (if (looking-at "\\<switch\\>") '/)) + (error)))) (require 'cc-styles) (c-add-style |