about summary refs log tree commit diff stats
path: root/edit
diff options
context:
space:
mode:
authorKartik K. Agaram <vc@akkartik.com>2017-06-16 09:29:08 -0700
committerKartik K. Agaram <vc@akkartik.com>2017-06-16 09:29:08 -0700
commit816a782afe52e2c4c464fd19d84b418ce3a34a28 (patch)
tree3fa3f236476897093bc6043bf9721b8e0e20064a /edit
parent836f70647efafe644c43dccf552fee2053f8f238 (diff)
downloadmu-816a782afe52e2c4c464fd19d84b418ce3a34a28.tar.gz
3915
Diffstat (limited to 'edit')
-rw-r--r--edit/003-shortcuts.mu6
1 files changed, 2 insertions, 4 deletions
diff --git a/edit/003-shortcuts.mu b/edit/003-shortcuts.mu
index 255fdebf..ec2a127a 100644
--- a/edit/003-shortcuts.mu
+++ b/edit/003-shortcuts.mu
@@ -1016,17 +1016,16 @@ def move-to-previous-line editor:&:editor -> go-render?:bool, editor:&:editor [
     # then scan back another line
     # if either step fails, give up without modifying cursor or coordinates
     curr:&:duplex-list:char <- copy before-cursor
+    old:&:duplex-list:char <- copy curr
     {
-      old:&:duplex-list:char <- copy curr
       c2:char <- get *curr, value:offset
       at-newline?:bool <- equal c2, 10/newline
       break-if at-newline?
-      curr:&:duplex-list:char <- before-previous-screen-line curr, editor
+      curr <- before-previous-screen-line curr, editor
       no-motion?:bool <- equal curr, old
       return-if no-motion?
     }
     {
-      old <- copy curr
       curr <- before-previous-screen-line curr, editor
       no-motion?:bool <- equal curr, old
       return-if no-motion?
@@ -3622,7 +3621,6 @@ after <handle-special-character> [
 ]
 
 # ctrl-/ - comment/uncomment current line
-# todo: scenarios
 
 after <handle-special-character> [
   {