aboutsummaryrefslogtreecommitdiff
path: root/ide/wg_ScriptView.ml
diff options
context:
space:
mode:
authorVincent Laporte2019-03-05 15:19:53 +0000
committerVincent Laporte2019-03-18 10:29:52 +0000
commit4298d6c15c425fd66e9673dee3fa27a3e9caafc9 (patch)
tree2e4a9d7d31e664196694934ab8616df29f2f3041 /ide/wg_ScriptView.ml
parent67847789beede10420ab631d5d0f9c2cfe9db72d (diff)
[ide] Address warning 50
Diffstat (limited to 'ide/wg_ScriptView.ml')
-rw-r--r--ide/wg_ScriptView.ml4
1 files changed, 2 insertions, 2 deletions
diff --git a/ide/wg_ScriptView.ml b/ide/wg_ScriptView.ml
index a3f8aaab25..bfa9d6e0c5 100644
--- a/ide/wg_ScriptView.ml
+++ b/ide/wg_ScriptView.ml
@@ -408,13 +408,13 @@ object (self)
| _ -> ()
method apply_unicode_binding () =
- (** Auxiliary method to reach the beginning of line or the
+ (* 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
else get_line_start iter#backward_char
in
- (** Main action *)
+ (* Main action *)
let buffer = self#buffer in
let insert = buffer#get_iter `INSERT in
let insert_mark = buffer#create_mark ~left_gravity:false insert in