about summary refs log tree commit diff stats
path: root/edit.mu
diff options
context:
space:
mode:
authorKartik K. Agaram <vc@akkartik.com>2015-08-22 15:12:00 -0700
committerKartik K. Agaram <vc@akkartik.com>2015-08-22 15:12:00 -0700
commit2806dbf57820cc0f11da83263576122cb436eeaf (patch)
treea0d911a75c5260b807167ab5c1dd41c1bbea2798 /edit.mu
parent5c927ca2f299752f25f90e252a3250888f247c48 (diff)
downloadmu-2806dbf57820cc0f11da83263576122cb436eeaf.tar.gz
2058
Diffstat (limited to 'edit.mu')
-rw-r--r--edit.mu2
1 files changed, 1 insertions, 1 deletions
diff --git a/edit.mu b/edit.mu
index 5e916a13..d395bd97 100644
--- a/edit.mu
+++ b/edit.mu
@@ -617,6 +617,7 @@ recipe handle-keyboard-event [
   editor:address:editor-data <- next-ingredient
   e:event <- next-ingredient
   reply-unless editor, screen/same-as-ingredient:0, editor/same-as-ingredient:1, 0/no-more-render
+  screen-width:number <- screen-width screen
   screen-height:number <- screen-height screen
   left:number <- get *editor, left:offset
   right:number <- get *editor, right:offset
@@ -1753,7 +1754,6 @@ after +handle-special-key [
     curr:address:duplex-list <- next-duplex *before-cursor  # refresh after remove-duplex above
     screen <- move-cursor screen, *cursor-row, *cursor-column
     curr-column:number <- copy *cursor-column
-    screen-width:number <- screen-width screen
     {
       # hit right margin? give up and let caller render
       at-right?:boolean <- greater-or-equal curr-column, screen-width