mirror of
https://github.com/vale981/boon
synced 2025-03-06 01:51:38 -05:00
oops
This commit is contained in:
parent
1d832c820a
commit
a9ec88c92f
2 changed files with 6 additions and 1 deletions
|
@ -73,6 +73,11 @@
|
||||||
(interactive)
|
(interactive)
|
||||||
(if (boon-special-mode-p) (boon-set-off-state) (boon-set-state 'boon-insert-state)))
|
(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 ()
|
(defun boon-set-command-state ()
|
||||||
"Switch to command state and push a mark to remember the last edition point."
|
"Switch to command state and push a mark to remember the last edition point."
|
||||||
(interactive) (boon-set-state 'boon-command-state))
|
(interactive) (boon-set-state 'boon-command-state))
|
||||||
|
|
|
@ -39,7 +39,7 @@
|
||||||
(unless (eq (following-char) 32)
|
(unless (eq (following-char) 32)
|
||||||
(insert (make-string 1 32))
|
(insert (make-string 1 32))
|
||||||
(backward-char 1))
|
(backward-char 1))
|
||||||
(boon-set-insert-like-state))
|
(boon-set-insert-state))
|
||||||
|
|
||||||
(defun boon-split-line ()
|
(defun boon-split-line ()
|
||||||
"split the current line"
|
"split the current line"
|
||||||
|
|
Loading…
Add table
Reference in a new issue