mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-28 02:40:46 -08:00
Code Issues Projects Releases Wiki Activity

* lisp/progmodes/ruby-mode.el (ruby-smie--indent-to-stmt): Use

Browse source 
`smie-backward-sexp' with token argument.
This commit is contained in:
Dmitry Gutov 2013-11-08 13:22:52 +02:00
parent 8acb09ca61
commit da3b328da0
2 changed files with 7 additions and 7 deletions
Download patch file Download diff file Expand all files Collapse all files

5
lisp/ChangeLog
View file

@ -1,3 +1,8 @@
2013-11-08 Dmitry Gutov <dgutov@yandex.ru>
* progmodes/ruby-mode.el (ruby-smie--indent-to-stmt): Use
`smie-backward-sexp' with token argument.
2013-11-08 Michael Albinus <michael.albinus@gmx.de>
* net/tramp-sh.el (tramp-set-remote-path, tramp-get-ls-command):

9
lisp/progmodes/ruby-mode.el
View file

@ -485,13 +485,8 @@ explicitly declared in magic comment."
(defun ruby-smie--indent-to-stmt ()
(save-excursion
(let (parent)
(while (not (or (eq (car parent) t)
(equal (nth 2 parent) ";")))
(setq parent (let (smie--parent) (smie-indent--parent)))
(when (numberp (nth 1 parent))
(goto-char (nth 1 parent))))
(cons 'column (smie-indent-virtual)))))
(smie-backward-sexp ";")
(cons 'column (smie-indent-virtual))))
(defun ruby-smie-rules (kind token)
(pcase (cons kind token)