diff options
| author | Kartik Agaram <vc@akkartik.com> | 2018-07-27 17:07:52 -0700 |
|---|---|---|
| committer | Kartik Agaram <vc@akkartik.com> | 2018-07-27 17:08:29 -0700 |
| commit | 5fe060d582d4a82444243a28b18085c971a85628 (patch) | |
| tree | 7a13eb020d0a9cab5d4195da931a373f575229ab /html/edit/012-editor-undo.mu.html | |
| parent | 013d95266d563a3f531c13eba6d2a6bfe18f8808 (diff) | |
| download | mu-5fe060d582d4a82444243a28b18085c971a85628.tar.gz | |
4447
Diffstat (limited to 'html/edit/012-editor-undo.mu.html')
| -rw-r--r-- | html/edit/012-editor-undo.mu.html | 54 |
1 files changed, 27 insertions, 27 deletions
diff --git a/html/edit/012-editor-undo.mu.html b/html/edit/012-editor-undo.mu.html index ca822068..705a47e4 100644 --- a/html/edit/012-editor-undo.mu.html +++ b/html/edit/012-editor-undo.mu.html @@ -15,17 +15,17 @@ body { font-size: 12pt; font-family: monospace; color: #aaaaaa; background-color a { color:#eeeeee; text-decoration: none; } a:hover { text-decoration: underline; } * { font-size: 12pt; font-size: 1em; } +.muData { color: #ffff00; } .muRecipe { color: #ff8700; } -.muScenario { color: #00af00; } .Special { color: #c00000; } .Delimiter { color: #800080; } .SalientComment { color: #00ffff; } .Constant { color: #00a0a0; } .LineNr { color: #444444; } +.muControl { color: #c0a020; } .Comment { color: #9090ff; } .Comment a { color:#0000ee; text-decoration:underline; } -.muControl { color: #c0a020; } -.muData { color: #ffff00; } +.muScenario { color: #00af00; } --> </style> @@ -138,7 +138,7 @@ if ('onhashchange' in window) { <span id="L76" class="LineNr"> 76 </span> redo <span class="Special"><-</span> push op, redo <span id="L77" class="LineNr"> 77 </span> *editor <span class="Special"><-</span> put *editor, <span class="Constant">redo:offset</span>, redo <span id="L78" class="LineNr"> 78 </span><span class="Constant"> <a href='012-editor-undo.mu.html#L78'><handle-undo></a></span> -<span id="L79" class="LineNr"> 79 </span> <span class="muControl"> return</span> <span class="Constant">1/go-render</span> +<span id="L79" class="LineNr"> 79 </span> <span class="muControl"> return</span><span class="Constant"> true/go-render</span> <span id="L80" class="LineNr"> 80 </span> <span class="Delimiter">}</span> <span id="L81" class="LineNr"> 81 </span>] <span id="L82" class="LineNr"> 82 </span> @@ -156,7 +156,7 @@ if ('onhashchange' in window) { <span id="L94" class="LineNr"> 94 </span> undo <span class="Special"><-</span> push op, undo <span id="L95" class="LineNr"> 95 </span> *editor <span class="Special"><-</span> put *editor, <span class="Constant">undo:offset</span>, undo <span id="L96" class="LineNr"> 96 </span><span class="Constant"> <a href='012-editor-undo.mu.html#L96'><handle-redo></a></span> -<span id="L97" class="LineNr"> 97 </span> <span class="muControl"> return</span> <span class="Constant">1/go-render</span> +<span id="L97" class="LineNr"> 97 </span> <span class="muControl"> return</span><span class="Constant"> true/go-render</span> <span id="L98" class="LineNr"> 98 </span> <span class="Delimiter">}</span> <span id="L99" class="LineNr"> 99 </span>] <span id="L100" class="LineNr"> 100 </span> @@ -220,7 +220,7 @@ if ('onhashchange' in window) { <span id="L158" class="LineNr"> 158 </span> previous-coalesce-tag:num <span class="Special"><-</span> get typing, <span class="Constant">tag:offset</span> <span id="L159" class="LineNr"> 159 </span> <span class="muControl">break-unless</span> previous-coalesce-tag <span id="L160" class="LineNr"> 160 </span> before-cursor:&:<a href='../065duplex_list.mu.html#L3'>duplex-list</a>:char <span class="Special"><-</span> get *editor, <span class="Constant">before-cursor:offset</span> -<span id="L161" class="LineNr"> 161 </span> insert-until:&:<a href='../065duplex_list.mu.html#L3'>duplex-list</a>:char <span class="Special"><-</span> <a href='../065duplex_list.mu.html#L25'>next</a> before-cursor +<span id="L161" class="LineNr"> 161 </span> insert-until:&:<a href='../065duplex_list.mu.html#L3'>duplex-list</a>:char <span class="Special"><-</span> <a href='../065duplex_list.mu.html#L31'>next</a> before-cursor <span id="L162" class="LineNr"> 162 </span> typing <span class="Special"><-</span> put typing, <span class="Constant">insert-until:offset</span>, insert-until <span id="L163" class="LineNr"> 163 </span> typing <span class="Special"><-</span> put typing, <span class="Constant">after-row:offset</span>, cursor-row <span id="L164" class="LineNr"> 164 </span> typing <span class="Special"><-</span> put typing, <span class="Constant">after-column:offset</span>, cursor-column @@ -229,8 +229,8 @@ if ('onhashchange' in window) { <span id="L167" class="LineNr"> 167 </span> <span class="muControl"> break</span> <span class="Constant">+done-adding-insert-operation</span> <span id="L168" class="LineNr"> 168 </span> <span class="Delimiter">}</span> <span id="L169" class="LineNr"> 169 </span> <span class="Comment"># if not, create a new operation</span> -<span id="L170" class="LineNr"> 170 </span> insert-from:&:<a href='../065duplex_list.mu.html#L3'>duplex-list</a>:char <span class="Special"><-</span> <a href='../065duplex_list.mu.html#L25'>next</a> cursor-before -<span id="L171" class="LineNr"> 171 </span> insert-to:&:<a href='../065duplex_list.mu.html#L3'>duplex-list</a>:char <span class="Special"><-</span> <a href='../065duplex_list.mu.html#L25'>next</a> insert-from +<span id="L170" class="LineNr"> 170 </span> insert-from:&:<a href='../065duplex_list.mu.html#L3'>duplex-list</a>:char <span class="Special"><-</span> <a href='../065duplex_list.mu.html#L31'>next</a> cursor-before +<span id="L171" class="LineNr"> 171 </span> insert-to:&:<a href='../065duplex_list.mu.html#L3'>duplex-list</a>:char <span class="Special"><-</span> <a href='../065duplex_list.mu.html#L31'>next</a> insert-from <span id="L172" class="LineNr"> 172 </span> op:&:<a href='012-editor-undo.mu.html#L5'>operation</a> <span class="Special"><-</span> new <span class="Constant"><a href='012-editor-undo.mu.html#L5'>operation</a>:type</span> <span id="L173" class="LineNr"> 173 </span> *op <span class="Special"><-</span> merge <span class="Constant">0/insert-operation</span>, save-row/before, save-column/before, top-before, cursor-row/after, cursor-column/after, top-after, insert-from, insert-to, <span class="Constant">1/coalesce</span> <span id="L174" class="LineNr"> 174 </span> editor <span class="Special"><-</span> <a href='012-editor-undo.mu.html#L202'>add-operation</a> editor, op @@ -249,9 +249,9 @@ if ('onhashchange' in window) { <span id="L187" class="LineNr"> 187 </span> cursor-row:num <span class="Special"><-</span> get *editor, <span class="Constant">cursor-row:offset</span> <span id="L188" class="LineNr"> 188 </span> cursor-column:num <span class="Special"><-</span> get *editor, <span class="Constant">cursor-row:offset</span> <span id="L189" class="LineNr"> 189 </span> <span class="Comment"># never coalesce</span> -<span id="L190" class="LineNr"> 190 </span> insert-from:&:<a href='../065duplex_list.mu.html#L3'>duplex-list</a>:char <span class="Special"><-</span> <a href='../065duplex_list.mu.html#L25'>next</a> cursor-before +<span id="L190" class="LineNr"> 190 </span> insert-from:&:<a href='../065duplex_list.mu.html#L3'>duplex-list</a>:char <span class="Special"><-</span> <a href='../065duplex_list.mu.html#L31'>next</a> cursor-before <span id="L191" class="LineNr"> 191 </span> before-cursor:&:<a href='../065duplex_list.mu.html#L3'>duplex-list</a>:char <span class="Special"><-</span> get *editor, <span class="Constant">before-cursor:offset</span> -<span id="L192" class="LineNr"> 192 </span> insert-to:&:<a href='../065duplex_list.mu.html#L3'>duplex-list</a>:char <span class="Special"><-</span> <a href='../065duplex_list.mu.html#L25'>next</a> before-cursor +<span id="L192" class="LineNr"> 192 </span> insert-to:&:<a href='../065duplex_list.mu.html#L3'>duplex-list</a>:char <span class="Special"><-</span> <a href='../065duplex_list.mu.html#L31'>next</a> before-cursor <span id="L193" class="LineNr"> 193 </span> op:&:<a href='012-editor-undo.mu.html#L5'>operation</a> <span class="Special"><-</span> new <span class="Constant"><a href='012-editor-undo.mu.html#L5'>operation</a>:type</span> <span id="L194" class="LineNr"> 194 </span> *op <span class="Special"><-</span> merge <span class="Constant">0/insert-operation</span>, cursor-row-before, cursor-column-before, top-before, cursor-row/after, cursor-column/after, top-after, insert-from, insert-to, <span class="Constant">0/never-coalesce</span> <span id="L195" class="LineNr"> 195 </span> editor <span class="Special"><-</span> <a href='012-editor-undo.mu.html#L202'>add-operation</a> editor, op @@ -268,7 +268,7 @@ if ('onhashchange' in window) { <span id="L206" class="LineNr"> 206 </span> undo <span class="Special"><-</span> push op undo <span id="L207" class="LineNr"> 207 </span> *editor <span class="Special"><-</span> put *editor, <span class="Constant">undo:offset</span>, undo <span id="L208" class="LineNr"> 208 </span> redo:&:<a href='../064list.mu.html#L6'>list</a>:&:<a href='012-editor-undo.mu.html#L5'>operation</a> <span class="Special"><-</span> get *editor, <span class="Constant">redo:offset</span> -<span id="L209" class="LineNr"> 209 </span> redo <span class="Special"><-</span> copy<span class="Constant"> 0</span> +<span id="L209" class="LineNr"> 209 </span> redo <span class="Special"><-</span> copy<span class="Constant"> null</span> <span id="L210" class="LineNr"> 210 </span> *editor <span class="Special"><-</span> put *editor, <span class="Constant">redo:offset</span>, redo <span id="L211" class="LineNr"> 211 </span>] <span id="L212" class="LineNr"> 212 </span> @@ -279,9 +279,9 @@ if ('onhashchange' in window) { <span id="L217" class="LineNr"> 217 </span> start:&:<a href='../065duplex_list.mu.html#L3'>duplex-list</a>:char <span class="Special"><-</span> get typing, <span class="Constant">insert-from:offset</span> <span id="L218" class="LineNr"> 218 </span> end:&:<a href='../065duplex_list.mu.html#L3'>duplex-list</a>:char <span class="Special"><-</span> get typing, <span class="Constant">insert-until:offset</span> <span id="L219" class="LineNr"> 219 </span> <span class="Comment"># assert cursor-row/cursor-column/top-of-screen match after-row/after-column/after-top-of-screen</span> -<span id="L220" class="LineNr"> 220 </span> before-cursor:&:<a href='../065duplex_list.mu.html#L3'>duplex-list</a>:char <span class="Special"><-</span> <a href='../065duplex_list.mu.html#L32'>prev</a> start +<span id="L220" class="LineNr"> 220 </span> before-cursor:&:<a href='../065duplex_list.mu.html#L3'>duplex-list</a>:char <span class="Special"><-</span> <a href='../065duplex_list.mu.html#L38'>prev</a> start <span id="L221" class="LineNr"> 221 </span> *editor <span class="Special"><-</span> put *editor, <span class="Constant">before-cursor:offset</span>, before-cursor -<span id="L222" class="LineNr"> 222 </span> <a href='../065duplex_list.mu.html#L385'>remove-between</a> before-cursor, end +<span id="L222" class="LineNr"> 222 </span> <a href='../065duplex_list.mu.html#L391'>remove-between</a> before-cursor, end <span id="L223" class="LineNr"> 223 </span> cursor-row <span class="Special"><-</span> get typing, <span class="Constant">before-row:offset</span> <span id="L224" class="LineNr"> 224 </span> *editor <span class="Special"><-</span> put *editor, <span class="Constant">cursor-row:offset</span>, cursor-row <span id="L225" class="LineNr"> 225 </span> cursor-column <span class="Special"><-</span> get typing, <span class="Constant">before-column:offset</span> @@ -479,7 +479,7 @@ if ('onhashchange' in window) { <span id="L417" class="LineNr"> 417 </span> before-cursor <span class="Special"><-</span> get *editor, <span class="Constant">before-cursor:offset</span> <span id="L418" class="LineNr"> 418 </span> insert-from:&:<a href='../065duplex_list.mu.html#L3'>duplex-list</a>:char <span class="Special"><-</span> get typing, <span class="Constant">insert-from:offset</span> <span class="Comment"># ignore insert-to because it's already been spliced away</span> <span id="L419" class="LineNr"> 419 </span> <span class="Comment"># assert insert-to matches next(before-cursor)</span> -<span id="L420" class="LineNr"> 420 </span> <a href='../065duplex_list.mu.html#L525'>splice</a> before-cursor, insert-from +<span id="L420" class="LineNr"> 420 </span> <a href='../065duplex_list.mu.html#L582'>splice</a> before-cursor, insert-from <span id="L421" class="LineNr"> 421 </span> <span class="Comment"># assert cursor-row/cursor-column/top-of-screen match after-row/after-column/after-top-of-screen</span> <span id="L422" class="LineNr"> 422 </span> cursor-row <span class="Special"><-</span> get typing, <span class="Constant">after-row:offset</span> <span id="L423" class="LineNr"> 423 </span> *editor <span class="Special"><-</span> put *editor, <span class="Constant">cursor-row:offset</span>, cursor-row @@ -1080,7 +1080,7 @@ if ('onhashchange' in window) { <span id="L1018" class="LineNr">1018 </span> <a href='002-typing.mu.html#L265'>editor-render</a> <a href='../081print.mu.html#L16'>screen</a>, e <span id="L1019" class="LineNr">1019 </span> <span class="Comment"># scroll the page</span> <span id="L1020" class="LineNr">1020 </span> assume-console [ -<span id="L1021" class="LineNr">1021 </span> press <a href='003-shortcuts.mu.html#L3597'>page-down</a> +<span id="L1021" class="LineNr">1021 </span> press <a href='003-shortcuts.mu.html#L3610'>page-down</a> <span id="L1022" class="LineNr">1022 </span> ] <span id="L1023" class="LineNr">1023 </span> <a href='002-typing.mu.html#L16'>editor-event-loop</a> <a href='../081print.mu.html#L16'>screen</a>, <a href='../084console.mu.html#L23'>console</a>, e <span id="L1024" class="LineNr">1024 </span> <span class="Comment"># undo</span> @@ -1114,7 +1114,7 @@ if ('onhashchange' in window) { <span id="L1052" class="LineNr">1052 </span> <a href='002-typing.mu.html#L265'>editor-render</a> <a href='../081print.mu.html#L16'>screen</a>, e <span id="L1053" class="LineNr">1053 </span> <span class="Comment"># scroll the page down and up</span> <span id="L1054" class="LineNr">1054 </span> assume-console [ -<span id="L1055" class="LineNr">1055 </span> press <a href='003-shortcuts.mu.html#L3597'>page-down</a> +<span id="L1055" class="LineNr">1055 </span> press <a href='003-shortcuts.mu.html#L3610'>page-down</a> <span id="L1056" class="LineNr">1056 </span> press ctrl-b <span id="L1057" class="LineNr">1057 </span> ] <span id="L1058" class="LineNr">1058 </span> <a href='002-typing.mu.html#L16'>editor-event-loop</a> <a href='../081print.mu.html#L16'>screen</a>, <a href='../084console.mu.html#L23'>console</a>, e @@ -1149,8 +1149,8 @@ if ('onhashchange' in window) { <span id="L1087" class="LineNr">1087 </span> <a href='002-typing.mu.html#L265'>editor-render</a> <a href='../081print.mu.html#L16'>screen</a>, e <span id="L1088" class="LineNr">1088 </span> <span class="Comment"># scroll the page down and up</span> <span id="L1089" class="LineNr">1089 </span> assume-console [ -<span id="L1090" class="LineNr">1090 </span> press <a href='003-shortcuts.mu.html#L3597'>page-down</a> -<span id="L1091" class="LineNr">1091 </span> press <a href='003-shortcuts.mu.html#L3820'>page-up</a> +<span id="L1090" class="LineNr">1090 </span> press <a href='003-shortcuts.mu.html#L3610'>page-down</a> +<span id="L1091" class="LineNr">1091 </span> press <a href='003-shortcuts.mu.html#L3833'>page-up</a> <span id="L1092" class="LineNr">1092 </span> ] <span id="L1093" class="LineNr">1093 </span> <a href='002-typing.mu.html#L16'>editor-event-loop</a> <a href='../081print.mu.html#L16'>screen</a>, <a href='../084console.mu.html#L23'>console</a>, e <span id="L1094" class="LineNr">1094 </span> <span class="Comment"># undo</span> @@ -1700,7 +1700,7 @@ if ('onhashchange' in window) { <span id="L1638" class="LineNr">1638 </span> <span class="muControl">break-unless</span> coalesce? <span id="L1639" class="LineNr">1639 </span> deletion <span class="Special"><-</span> put deletion, <span class="Constant">delete-from:offset</span>, before-cursor <span id="L1640" class="LineNr">1640 </span> backspaced-so-far:&:<a href='../065duplex_list.mu.html#L3'>duplex-list</a>:char <span class="Special"><-</span> get deletion, <span class="Constant">deleted-text:offset</span> -<span id="L1641" class="LineNr">1641 </span> <a href='../065duplex_list.mu.html#L525'>splice</a> backspaced-cell, backspaced-so-far +<span id="L1641" class="LineNr">1641 </span> <a href='../065duplex_list.mu.html#L582'>splice</a> backspaced-cell, backspaced-so-far <span id="L1642" class="LineNr">1642 </span> deletion <span class="Special"><-</span> put deletion, <span class="Constant">deleted-text:offset</span>, backspaced-cell <span id="L1643" class="LineNr">1643 </span> deletion <span class="Special"><-</span> put deletion, <span class="Constant">after-row:offset</span>, cursor-row <span id="L1644" class="LineNr">1644 </span> deletion <span class="Special"><-</span> put deletion, <span class="Constant">after-column:offset</span>, cursor-column @@ -1710,7 +1710,7 @@ if ('onhashchange' in window) { <span id="L1648" class="LineNr">1648 </span> <span class="Delimiter">}</span> <span id="L1649" class="LineNr">1649 </span> <span class="Comment"># if not, create a new operation</span> <span id="L1650" class="LineNr">1650 </span> op:&:<a href='012-editor-undo.mu.html#L5'>operation</a> <span class="Special"><-</span> new <span class="Constant"><a href='012-editor-undo.mu.html#L5'>operation</a>:type</span> -<span id="L1651" class="LineNr">1651 </span> deleted-until:&:<a href='../065duplex_list.mu.html#L3'>duplex-list</a>:char <span class="Special"><-</span> <a href='../065duplex_list.mu.html#L25'>next</a> before-cursor +<span id="L1651" class="LineNr">1651 </span> deleted-until:&:<a href='../065duplex_list.mu.html#L3'>duplex-list</a>:char <span class="Special"><-</span> <a href='../065duplex_list.mu.html#L31'>next</a> before-cursor <span id="L1652" class="LineNr">1652 </span> *op <span class="Special"><-</span> merge <span class="Constant">2/delete-operation</span>, save-row/before, save-column/before, top-before, cursor-row/after, cursor-column/after, top-after, backspaced-cell/deleted, before-cursor/delete-from, deleted-until, <span class="Constant">1/coalesce-backspace</span> <span id="L1653" class="LineNr">1653 </span> editor <span class="Special"><-</span> <a href='012-editor-undo.mu.html#L202'>add-operation</a> editor, op <span id="L1654" class="LineNr">1654 </span><span class="Constant"> +done-adding-backspace-operation</span> @@ -1724,8 +1724,8 @@ if ('onhashchange' in window) { <span id="L1662" class="LineNr">1662 </span> anchor:&:<a href='../065duplex_list.mu.html#L3'>duplex-list</a>:char <span class="Special"><-</span> get deletion, <span class="Constant">delete-from:offset</span> <span id="L1663" class="LineNr">1663 </span> <span class="muControl">break-unless</span> anchor <span id="L1664" class="LineNr">1664 </span> deleted:&:<a href='../065duplex_list.mu.html#L3'>duplex-list</a>:char <span class="Special"><-</span> get deletion, <span class="Constant">deleted-text:offset</span> -<span id="L1665" class="LineNr">1665 </span> old-cursor:&:<a href='../065duplex_list.mu.html#L3'>duplex-list</a>:char <span class="Special"><-</span> <a href='../065duplex_list.mu.html#L572'>last</a> deleted -<span id="L1666" class="LineNr">1666 </span> <a href='../065duplex_list.mu.html#L525'>splice</a> anchor, deleted +<span id="L1665" class="LineNr">1665 </span> old-cursor:&:<a href='../065duplex_list.mu.html#L3'>duplex-list</a>:char <span class="Special"><-</span> <a href='../065duplex_list.mu.html#L629'>last</a> deleted +<span id="L1666" class="LineNr">1666 </span> <a href='../065duplex_list.mu.html#L582'>splice</a> anchor, deleted <span id="L1667" class="LineNr">1667 </span> <span class="Comment"># assert cursor-row/cursor-column/top-of-screen match after-row/after-column/after-top-of-screen</span> <span id="L1668" class="LineNr">1668 </span> before-cursor <span class="Special"><-</span> copy old-cursor <span id="L1669" class="LineNr">1669 </span> cursor-row <span class="Special"><-</span> get deletion, <span class="Constant">before-row:offset</span> @@ -1744,7 +1744,7 @@ if ('onhashchange' in window) { <span id="L1682" class="LineNr">1682 </span> start:&:<a href='../065duplex_list.mu.html#L3'>duplex-list</a>:char <span class="Special"><-</span> get deletion, <span class="Constant">delete-from:offset</span> <span id="L1683" class="LineNr">1683 </span> end:&:<a href='../065duplex_list.mu.html#L3'>duplex-list</a>:char <span class="Special"><-</span> get deletion, <span class="Constant">delete-until:offset</span> <span id="L1684" class="LineNr">1684 </span> data:&:<a href='../065duplex_list.mu.html#L3'>duplex-list</a>:char <span class="Special"><-</span> get *editor, <span class="Constant">data:offset</span> -<span id="L1685" class="LineNr">1685 </span> <a href='../065duplex_list.mu.html#L385'>remove-between</a> start, end +<span id="L1685" class="LineNr">1685 </span> <a href='../065duplex_list.mu.html#L391'>remove-between</a> start, end <span id="L1686" class="LineNr">1686 </span> <span class="Comment"># assert cursor-row/cursor-column/top-of-screen match after-row/after-column/after-top-of-screen</span> <span id="L1687" class="LineNr">1687 </span> cursor-row <span class="Special"><-</span> get deletion, <span class="Constant">after-row:offset</span> <span id="L1688" class="LineNr">1688 </span> *editor <span class="Special"><-</span> put *editor, <span class="Constant">cursor-row:offset</span>, cursor-row @@ -1924,7 +1924,7 @@ if ('onhashchange' in window) { <span id="L1862" class="LineNr">1862 </span> previous-coalesce-tag:num <span class="Special"><-</span> get deletion, <span class="Constant">tag:offset</span> <span id="L1863" class="LineNr">1863 </span> coalesce?:bool <span class="Special"><-</span> equal previous-coalesce-tag, <span class="Constant">2/coalesce-delete</span> <span id="L1864" class="LineNr">1864 </span> <span class="muControl">break-unless</span> coalesce? -<span id="L1865" class="LineNr">1865 </span> delete-until:&:<a href='../065duplex_list.mu.html#L3'>duplex-list</a>:char <span class="Special"><-</span> <a href='../065duplex_list.mu.html#L25'>next</a> before-cursor +<span id="L1865" class="LineNr">1865 </span> delete-until:&:<a href='../065duplex_list.mu.html#L3'>duplex-list</a>:char <span class="Special"><-</span> <a href='../065duplex_list.mu.html#L31'>next</a> before-cursor <span id="L1866" class="LineNr">1866 </span> deletion <span class="Special"><-</span> put deletion, <span class="Constant">delete-until:offset</span>, delete-until <span id="L1867" class="LineNr">1867 </span> deleted-so-far:&:<a href='../065duplex_list.mu.html#L3'>duplex-list</a>:char <span class="Special"><-</span> get deletion, <span class="Constant">deleted-text:offset</span> <span id="L1868" class="LineNr">1868 </span> deleted-so-far <span class="Special"><-</span> append deleted-so-far, deleted-cell @@ -1937,7 +1937,7 @@ if ('onhashchange' in window) { <span id="L1875" class="LineNr">1875 </span> <span class="Delimiter">}</span> <span id="L1876" class="LineNr">1876 </span> <span class="Comment"># if not, create a new operation</span> <span id="L1877" class="LineNr">1877 </span> op:&:<a href='012-editor-undo.mu.html#L5'>operation</a> <span class="Special"><-</span> new <span class="Constant"><a href='012-editor-undo.mu.html#L5'>operation</a>:type</span> -<span id="L1878" class="LineNr">1878 </span> deleted-until:&:<a href='../065duplex_list.mu.html#L3'>duplex-list</a>:char <span class="Special"><-</span> <a href='../065duplex_list.mu.html#L25'>next</a> before-cursor +<span id="L1878" class="LineNr">1878 </span> deleted-until:&:<a href='../065duplex_list.mu.html#L3'>duplex-list</a>:char <span class="Special"><-</span> <a href='../065duplex_list.mu.html#L31'>next</a> before-cursor <span id="L1879" class="LineNr">1879 </span> *op <span class="Special"><-</span> merge <span class="Constant">2/delete-operation</span>, save-row/before, save-column/before, top-before, cursor-row/after, cursor-column/after, top-after, deleted-cell/deleted, before-cursor/delete-from, deleted-until, <span class="Constant">2/coalesce-delete</span> <span id="L1880" class="LineNr">1880 </span> editor <span class="Special"><-</span> <a href='012-editor-undo.mu.html#L202'>add-operation</a> editor, op <span id="L1881" class="LineNr">1881 </span><span class="Constant"> +done-adding-delete-operation</span> @@ -2039,7 +2039,7 @@ if ('onhashchange' in window) { <span id="L1977" class="LineNr">1977 </span> top-after:&:<a href='../065duplex_list.mu.html#L3'>duplex-list</a>:char <span class="Special"><-</span> get *editor, <span class="Constant">top-of-screen:offset</span> <span id="L1978" class="LineNr">1978 </span> cursor-row:num <span class="Special"><-</span> get *editor, <span class="Constant">cursor-row:offset</span> <span id="L1979" class="LineNr">1979 </span> cursor-column:num <span class="Special"><-</span> get *editor, <span class="Constant">cursor-column:offset</span> -<span id="L1980" class="LineNr">1980 </span> deleted-until:&:<a href='../065duplex_list.mu.html#L3'>duplex-list</a>:char <span class="Special"><-</span> <a href='../065duplex_list.mu.html#L25'>next</a> before-cursor +<span id="L1980" class="LineNr">1980 </span> deleted-until:&:<a href='../065duplex_list.mu.html#L3'>duplex-list</a>:char <span class="Special"><-</span> <a href='../065duplex_list.mu.html#L31'>next</a> before-cursor <span id="L1981" class="LineNr">1981 </span> op:&:<a href='012-editor-undo.mu.html#L5'>operation</a> <span class="Special"><-</span> new <span class="Constant"><a href='012-editor-undo.mu.html#L5'>operation</a>:type</span> <span id="L1982" class="LineNr">1982 </span> *op <span class="Special"><-</span> merge <span class="Constant">2/delete-operation</span>, save-row/before, save-column/before, top-before, cursor-row/after, cursor-column/after, top-after, deleted-cells/deleted, before-cursor/delete-from, deleted-until, <span class="Constant">0/never-coalesce</span> <span id="L1983" class="LineNr">1983 </span> editor <span class="Special"><-</span> <a href='012-editor-undo.mu.html#L202'>add-operation</a> editor, op @@ -2142,7 +2142,7 @@ if ('onhashchange' in window) { <span id="L2080" class="LineNr">2080 </span> top-after:&:<a href='../065duplex_list.mu.html#L3'>duplex-list</a>:char <span class="Special"><-</span> get *editor, <span class="Constant">top-of-screen:offset</span> <span id="L2081" class="LineNr">2081 </span> op:&:<a href='012-editor-undo.mu.html#L5'>operation</a> <span class="Special"><-</span> new <span class="Constant"><a href='012-editor-undo.mu.html#L5'>operation</a>:type</span> <span id="L2082" class="LineNr">2082 </span> before-cursor:&:<a href='../065duplex_list.mu.html#L3'>duplex-list</a>:char <span class="Special"><-</span> get *editor, <span class="Constant">before-cursor:offset</span> -<span id="L2083" class="LineNr">2083 </span> deleted-until:&:<a href='../065duplex_list.mu.html#L3'>duplex-list</a>:char <span class="Special"><-</span> <a href='../065duplex_list.mu.html#L25'>next</a> before-cursor +<span id="L2083" class="LineNr">2083 </span> deleted-until:&:<a href='../065duplex_list.mu.html#L3'>duplex-list</a>:char <span class="Special"><-</span> <a href='../065duplex_list.mu.html#L31'>next</a> before-cursor <span id="L2084" class="LineNr">2084 </span> cursor-row:num <span class="Special"><-</span> get *editor, <span class="Constant">cursor-row:offset</span> <span id="L2085" class="LineNr">2085 </span> cursor-column:num <span class="Special"><-</span> get *editor, <span class="Constant">cursor-column:offset</span> <span id="L2086" class="LineNr">2086 </span> *op <span class="Special"><-</span> merge <span class="Constant">2/delete-operation</span>, save-row/before, save-column/before, top-before, cursor-row/after, cursor-column/after, top-after, deleted-cells/deleted, before-cursor/delete-from, deleted-until, <span class="Constant">0/never-coalesce</span> |