Fix tests

src/text_editor.cpp

@@ -6,17 +6,16 @@
 - [ ] KillProcess in console !!! - should also kill all the children ...........
 - [x] ctrl-e with these short main.c:290: breaks a little, need to first click ctrl-e and then alt-e to jump
 - [ ] Use command window without special fuzzy search features to type commands and stuff for executing shell etc..
+- [ ] I noticed WordComplete getting busted and returning cutdown words but not sure how to repro ...
 
 ## Monaco like design for familiarity
 - [x] Ctrl+Alt+- and Ctrl+Shift+- Jump back, jump forward
 - [x] ctrl-shift-l select all occurences of a string
+- [x] ctrl-alt-r open containing folder (file explorer system)
+- [x] ctrl-alt-MouseMove should do a box select with multiple cursors thing
 - [ ] ctrl-tab - switch file lister with instant hold release semantics?
 - [ ] SearchAndReplace how to do better?
-- [ ] ctrl-alt-MouseClick should add a cursor instead of alt-MouseClick
 - [ ] ctrl-t find workspace symbols? how can we do it?
-- [ ] ctrl-b what to do with this?
-- [ ] ctrl-alt-r open containing folder (file explorer system)
-- [ ] ctrl-alt-MouseMove should do a box select with multiple cursors thing
 - [ ] Snippet design?
 
 - [ ] Make a platform layer and separate SDL stuff out
@@ -425,8 +424,11 @@ void OnCommand(Event event) {
                 DocumentSelected = active.window->id;
 
                 Int p = ScreenSpaceToBufferPos(active.window, active.view, active.buffer, mouse);
-                if (event.alt) Insert(&active.view->carets, MakeCaret(p, p), 0);
-                if (!event.alt && !event.shift) active.view->carets.len = 1;
+                if (event.alt) {
+                    Insert(&active.view->carets, MakeCaret(p, p), 0);
+                } else if (!event.alt && !event.shift) {
+                    active.view->carets.len = 1;
+                }
 
                 Caret &caret = active.view->carets[0];
                 if (event.shift) {