diff options
author | Kartik K. Agaram <vc@akkartik.com> | 2016-12-11 16:19:37 -0800 |
---|---|---|
committer | Kartik K. Agaram <vc@akkartik.com> | 2016-12-11 16:19:37 -0800 |
commit | d81fcff20567a1d5e793e813bc761222885660b1 (patch) | |
tree | 6733adff9f1b231c21c9caeb7705d712e77b3762 | |
parent | 294b2ab35983ebe95698835bb54bca8bd3eec101 (diff) | |
download | mu-d81fcff20567a1d5e793e813bc761222885660b1.tar.gz |
3706
-rw-r--r-- | edit/003-shortcuts.mu | 4 | ||||
-rw-r--r-- | html/edit/003-shortcuts.mu.html | 4 | ||||
-rw-r--r-- | sandbox/003-shortcuts.mu | 4 |
3 files changed, 6 insertions, 6 deletions
diff --git a/edit/003-shortcuts.mu b/edit/003-shortcuts.mu index 1b352fdd..941d316d 100644 --- a/edit/003-shortcuts.mu +++ b/edit/003-shortcuts.mu @@ -1357,7 +1357,7 @@ def move-to-start-of-line editor:&:editor -> editor:&:editor [ # update before-cursor before-cursor:&:duplex-list:char <- get *editor, before-cursor:offset init:&:duplex-list:char <- get *editor, data:offset - # while not at start of line, move + # while not at start of line, move { at-start-of-text?:bool <- equal before-cursor, init break-if at-start-of-text? @@ -1526,7 +1526,7 @@ def move-to-end-of-line editor:&:editor -> editor:&:editor [ load-ingredients before-cursor:&:duplex-list:char <- get *editor, before-cursor:offset cursor-column:num <- get *editor, cursor-column:offset - # while not at start of line, move + # while not at start of line, move { next:&:duplex-list:char <- next before-cursor break-unless next # end of text diff --git a/html/edit/003-shortcuts.mu.html b/html/edit/003-shortcuts.mu.html index 504afa7f..1f6ab8f0 100644 --- a/html/edit/003-shortcuts.mu.html +++ b/html/edit/003-shortcuts.mu.html @@ -1391,7 +1391,7 @@ d] <span class="Comment"># update before-cursor</span> before-cursor:&:duplex-list:char <span class="Special"><-</span> get *editor, <span class="Constant">before-cursor:offset</span> init:&:duplex-list:char <span class="Special"><-</span> get *editor, <span class="Constant">data:offset</span> - <span class="Comment"># while not at start of line, move </span> + <span class="Comment"># while not at start of line, move</span> <span class="Delimiter">{</span> at-start-of-text?:bool <span class="Special"><-</span> equal before-cursor, init <span class="muControl">break-if</span> at-start-of-text? @@ -1560,7 +1560,7 @@ d] <span class="Constant">load-ingredients</span> before-cursor:&:duplex-list:char <span class="Special"><-</span> get *editor, <span class="Constant">before-cursor:offset</span> cursor-column:num <span class="Special"><-</span> get *editor, <span class="Constant">cursor-column:offset</span> - <span class="Comment"># while not at start of line, move </span> + <span class="Comment"># while not at start of line, move</span> <span class="Delimiter">{</span> next:&:duplex-list:char <span class="Special"><-</span> next before-cursor <span class="muControl">break-unless</span> next <span class="Comment"># end of text</span> diff --git a/sandbox/003-shortcuts.mu b/sandbox/003-shortcuts.mu index 4ea2b8cd..9d4200ce 100644 --- a/sandbox/003-shortcuts.mu +++ b/sandbox/003-shortcuts.mu @@ -1332,7 +1332,7 @@ def move-to-start-of-line editor:&:editor -> editor:&:editor [ # update before-cursor before-cursor:&:duplex-list:char <- get *editor, before-cursor:offset init:&:duplex-list:char <- get *editor, data:offset - # while not at start of line, move + # while not at start of line, move { at-start-of-text?:bool <- equal before-cursor, init break-if at-start-of-text? @@ -1501,7 +1501,7 @@ def move-to-end-of-line editor:&:editor -> editor:&:editor [ load-ingredients before-cursor:&:duplex-list:char <- get *editor, before-cursor:offset cursor-column:num <- get *editor, cursor-column:offset - # while not at start of line, move + # while not at start of line, move { next:&:duplex-list:char <- next before-cursor break-unless next # end of text |