unofficial mirror of bug-gnu-emacs@gnu.org 
 help / color / mirror / code / Atom feed
From: Nobuyoshi Nakada <nobu@ruby-lang.org>
To: 36756@debbugs.gnu.org
Subject: bug#36756: 26.2; ruby-toggle-block does not chomp trailing whitespaces in block
Date: Mon, 22 Jul 2019 10:52:01 +0900	[thread overview]
Message-ID: <14045b66-b3dd-1222-6676-c3737f54f617@gmail.com> (raw)

[-- Attachment #1: Type: text/plain, Size: 240 bytes --]

Current ruby-brace-to-do-end function does not remove trailing spaces at 
the end of the block.

This issue was originally reported at 
https://github.com/syl20bnr/spacemacs/issues/12548 and then 
https://bugs.ruby-lang.org/issues/16014.



[-- Attachment #2: 0001-Strip-trailing-whitespaces-at-the-end-of-converted-d.patch --]
[-- Type: text/plain, Size: 1834 bytes --]

From 5daa8f5946e50dd3c461079442452115f47e44a1 Mon Sep 17 00:00:00 2001
From: Nobuyoshi Nakada <nobu@ruby-lang.org>
Date: Mon, 22 Jul 2019 10:14:01 +0900
Subject: [PATCH] Strip trailing whitespaces at the end of converted do block

* lisp/progmodes/ruby-mode.el (ruby-brace-to-do-end): Strip
trailing whitespaces at the end of converted do block.

https://bugs.ruby-lang.org/issues/16014
https://github.com/syl20bnr/spacemacs/issues/12548
---
 lisp/progmodes/ruby-mode.el            | 3 ++-
 test/lisp/progmodes/ruby-mode-tests.el | 6 +++++-
 2 files changed, 7 insertions(+), 2 deletions(-)

diff --git a/lisp/progmodes/ruby-mode.el b/lisp/progmodes/ruby-mode.el
index 8eadf018..1fe832d9 100644
--- a/lisp/progmodes/ruby-mode.el
+++ b/lisp/progmodes/ruby-mode.el
@@ -1690,7 +1690,8 @@ ruby-brace-to-do-end
     (when (eq (char-before) ?\})
       (delete-char -1)
       (when (save-excursion
-              (skip-chars-backward " \t")
+              (let ((n (skip-chars-backward " \t")))
+		(if (< n 0) (delete-char (- n))))
               (not (bolp)))
         (insert "\n"))
       (insert "end")
diff --git a/test/lisp/progmodes/ruby-mode-tests.el b/test/lisp/progmodes/ruby-mode-tests.el
index efbe0124..83fcdd8a 100644
--- a/test/lisp/progmodes/ruby-mode-tests.el
+++ b/test/lisp/progmodes/ruby-mode-tests.el
@@ -369,7 +369,11 @@ ruby-toggle-block-to-do-end
   (ruby-with-temp-buffer "foo {|b|\n}"
     (beginning-of-line)
     (ruby-toggle-block)
-    (should (string= "foo do |b|\nend" (buffer-string)))))
+    (should (string= "foo do |b|\nend" (buffer-string))))
+  (ruby-with-temp-buffer "foo {|b| b }"
+    (beginning-of-line)
+    (ruby-toggle-block)
+    (should (string= "foo do |b|\n  b\nend" (buffer-string)))))
 
 (ert-deftest ruby-toggle-block-to-brace ()
   (let ((pairs '((17 . "foo { |b| b + 2 }")
-- 
2.22.0


             reply	other threads:[~2019-07-22  1:52 UTC|newest]

Thread overview: 2+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2019-07-22  1:52 Nobuyoshi Nakada [this message]
2019-07-25 13:02 ` bug#36756: 26.2; ruby-toggle-block does not chomp trailing whitespaces in block Dmitry Gutov

Reply instructions:

You may reply publicly to this message via plain-text email
using any one of the following methods:

* Save the following mbox file, import it into your mail client,
  and reply-to-all from there: mbox

  Avoid top-posting and favor interleaved quoting:
  https://en.wikipedia.org/wiki/Posting_style#Interleaved_style

  List information: https://www.gnu.org/software/emacs/

* Reply using the --to, --cc, and --in-reply-to
  switches of git-send-email(1):

  git send-email \
    --in-reply-to=14045b66-b3dd-1222-6676-c3737f54f617@gmail.com \
    --to=nobu@ruby-lang.org \
    --cc=36756@debbugs.gnu.org \
    /path/to/YOUR_REPLY

  https://kernel.org/pub/software/scm/git/docs/git-send-email.html

* If your mail client supports setting the In-Reply-To header
  via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line before the message body.
Code repositories for project(s) associated with this public inbox

	https://git.savannah.gnu.org/cgit/emacs.git

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).