]> git.eshelyaron.com Git - emacs.git/commitdiff
Make ruby-parse-partial more stable
authorDmitry Gutov <dgutov@yandex.ru>
Sat, 22 Aug 2020 13:21:50 +0000 (16:21 +0300)
committerDmitry Gutov <dgutov@yandex.ru>
Sat, 22 Aug 2020 13:26:47 +0000 (16:26 +0300)
* lisp/progmodes/ruby-mode.el (ruby-parse-partial):
Don't call ruby-deep-indent-paren-p (bug#42841).

lisp/progmodes/ruby-mode.el

index e16225c7fa9e61a0c6c73cafe5c29223ef7c193d..831acf87bf0f054f77faca7d4ddbc329ff06273b 100644 (file)
@@ -1060,22 +1060,12 @@ delimiter."
         (goto-char (point))
         )
        ((looking-at "[\\[{(]")
-        (let ((deep (ruby-deep-indent-paren-p (char-after))))
-          (if (and deep (or (not (eq (char-after) ?\{)) (ruby-expr-beg)))
-              (progn
-                (and (eq deep 'space) (looking-at ".\\s +[^# \t\n]")
-                     (setq pnt (1- (match-end 0))))
-                (setq nest (cons (cons (char-after (point)) pnt) nest))
-                (setq pcol (cons (cons pnt depth) pcol))
-                (setq depth 0))
-            (setq nest (cons (cons (char-after (point)) pnt) nest))
-            (setq depth (1+ depth))))
+        (setq nest (cons (cons (char-after (point)) pnt) nest))
+        (setq depth (1+ depth))
         (goto-char pnt)
         )
        ((looking-at "[])}]")
-        (if (ruby-deep-indent-paren-p (matching-paren (char-after)))
-            (setq depth (cdr (car pcol)) pcol (cdr pcol))
-          (setq depth (1- depth)))
+        (setq depth (1- depth))
         (setq nest (cdr nest))
         (goto-char pnt))
        ((looking-at ruby-block-end-re)