aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorcharguer2019-10-08 14:04:55 +0200
committercharguer2019-10-08 14:04:55 +0200
commit63a2894dfbcf0362e67c971ab233487f5e0f6227 (patch)
tree5e585e5cfaf3dc8b073428b3433b529c6363e858
parente01c9132fc505a3c443bee27d88dcd16a566616f (diff)
Fix #10842: incorrect handling of unicode input before space
-rw-r--r--ide/wg_ScriptView.ml4
1 files changed, 1 insertions, 3 deletions
diff --git a/ide/wg_ScriptView.ml b/ide/wg_ScriptView.ml
index 279815d671..181418d3d8 100644
--- a/ide/wg_ScriptView.ml
+++ b/ide/wg_ScriptView.ml
@@ -408,10 +408,8 @@ object (self)
| _ -> ()
method apply_unicode_binding () =
- (* Auxiliary method to reach the beginning of line or the
- nearest space before the iterator. *)
let rec get_line_start iter =
- if iter#starts_line || Glib.Unichar.isspace iter#char then iter
+ if iter#starts_line then iter
else get_line_start iter#backward_char
in
(* Main action *)