about summary refs log tree commit diff stats
diff options
context:
space:
mode:
authorKartik K. Agaram <vc@akkartik.com>2015-08-29 17:50:07 -0700
committerKartik K. Agaram <vc@akkartik.com>2015-08-29 17:50:07 -0700
commit8e9124f214f7f752056d27c79faed0163178f51e (patch)
treed7d15558c2e60fa4375288c96f5022185df9cd71
parentcae121b435807cdaa10d9e0cc96639d5aadbe159 (diff)
downloadmu-8e9124f214f7f752056d27c79faed0163178f51e.tar.gz
2104
-rw-r--r--edit.mu5
1 files changed, 3 insertions, 2 deletions
diff --git a/edit.mu b/edit.mu
index ee0190df..0b5f2ba6 100644
--- a/edit.mu
+++ b/edit.mu
@@ -6813,9 +6813,10 @@ after +handle-redo [
   {
     typing:address:insert-operation <- maybe-convert *op, typing:variant
     break-unless typing
-    insert-from:address:duplex-list <- get *typing, insert-from:offset
-    # assert cursor-row/cursor-column/top-of-screen match after-row/after-column/after-top-of-screen
+    insert-from:address:duplex-list <- get *typing, insert-from:offset  # ignore insert-to because it's already been spliced away
+    # assert insert-to matches next-duplex(*before-cursor)
     insert-duplex-range *before-cursor, insert-from
+    # assert cursor-row/cursor-column/top-of-screen match after-row/after-column/after-top-of-screen
     *cursor-row <- get *typing, after-row:offset
     *cursor-column <- get *typing, after-column:offset
     top:address:address:duplex-list <- get *editor, top-of-screen:offset