From a9ec88c92fe7c76305e52f21ac81bdd8a4199a12 Mon Sep 17 00:00:00 2001 From: Jean-Philippe Bernardy Date: Mon, 20 Oct 2014 22:44:11 +0200 Subject: [PATCH] oops --- boon-core.el | 5 +++++ boon-extras.el | 2 +- 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/boon-core.el b/boon-core.el index 1df4fc1..ffc32fa 100644 --- a/boon-core.el +++ b/boon-core.el @@ -73,6 +73,11 @@ (interactive) (if (boon-special-mode-p) (boon-set-off-state) (boon-set-state 'boon-insert-state))) +(defun boon-set-insert-state () + "Switch to insert state." + (interactive) + (boon-set-state 'boon-insert-state)) + (defun boon-set-command-state () "Switch to command state and push a mark to remember the last edition point." (interactive) (boon-set-state 'boon-command-state)) diff --git a/boon-extras.el b/boon-extras.el index 3a7b0f8..b496df5 100644 --- a/boon-extras.el +++ b/boon-extras.el @@ -39,7 +39,7 @@ (unless (eq (following-char) 32) (insert (make-string 1 32)) (backward-char 1)) - (boon-set-insert-like-state)) + (boon-set-insert-state)) (defun boon-split-line () "split the current line"