emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/ruby-end afd0459b11 11/91: When not expanding, fall bac


From: ELPA Syncer
Subject: [elpa] externals/ruby-end afd0459b11 11/91: When not expanding, fall back instead of assuming that space inserts a blank.
Date: Wed, 25 Jan 2023 19:58:24 -0500 (EST)

branch: externals/ruby-end
commit afd0459b11794a85db5f9c920243602c85268d92
Author: Johan Andersson <johan.rejeep@gmail.com>
Commit: Johan Andersson <johan.rejeep@gmail.com>

    When not expanding, fall back instead of assuming that space inserts a 
blank.
---
 ruby-end.el | 17 +++++++++++++----
 1 file changed, 13 insertions(+), 4 deletions(-)

diff --git a/ruby-end.el b/ruby-end.el
index a8fd51575d..416bcb9fb9 100644
--- a/ruby-end.el
+++ b/ruby-end.el
@@ -46,9 +46,12 @@
 
 ;;; Code:
 
+(defvar ruby-end-expand-key "SPC"
+  "Space key name.")
+
 (defvar ruby-end-mode-map
   (let ((map (make-sparse-keymap)))
-    (define-key map (kbd "SPC") 'ruby-end-space)
+    (define-key map (kbd ruby-end-expand-key) 'ruby-end-space)
     map)
   "Keymap for `ruby-end-mode'.")
 
@@ -59,9 +62,15 @@
 (defun ruby-end-space ()
   "Called when SPC-key is pressed."
   (interactive)
-  (when (ruby-end-expand-p)
-    (ruby-end-insert-end))
-  (insert " "))
+  (cond
+   ((ruby-end-expand-p)
+    (ruby-end-insert-end)
+    (insert " "))
+   (t
+    (let ((ruby-end-mode nil))
+      (call-interactively
+       (key-binding
+        (kbd ruby-end-expand-key)))))))
 
 (defun ruby-end-insert-end ()
   "Closes block by inserting end."



reply via email to

[Prev in Thread] Current Thread [Next in Thread]