diff options
| author | charguer | 2018-09-26 11:37:33 +0200 |
|---|---|---|
| committer | Vincent Laporte | 2019-03-18 10:29:50 +0000 |
| commit | fbf5696a3b9c90301dd6b8c2eef8f055ba0ff278 (patch) | |
| tree | d31484bb82f47ad6759f1464fe81447539a65885 /ide/wg_ScriptView.ml | |
| parent | d183e6b3bef905032333135849104fc66d5de68d (diff) | |
support for coqide commande line arguments
Diffstat (limited to 'ide/wg_ScriptView.ml')
| -rw-r--r-- | ide/wg_ScriptView.ml | 8 |
1 files changed, 3 insertions, 5 deletions
diff --git a/ide/wg_ScriptView.ml b/ide/wg_ScriptView.ml index 97bf9aefc5..efacaee577 100644 --- a/ide/wg_ScriptView.ml +++ b/ide/wg_ScriptView.ml @@ -407,8 +407,8 @@ object (self) self#buffer#delete_mark (`MARK stop_mark) | _ -> () - method latex_to_unicode () (* (show_warning:string->unit) *) = - let bindings = Preferences.get_latex_to_unicode() in + method apply_unicode_binding () = + let bindings = Preferences.get_unicode_bindings() in (** Auxiliary function to test whether [s] is a prefix of [str]; Note that there might be overlap with wg_Completion::is_substring *) let string_is_prefix s str = @@ -459,9 +459,7 @@ object (self) let prefix = backslash#get_text ~stop:insert in let word = match lookup prefix with - | None -> - (* show_warning ("No binding match " ^ prefix); *) - raise Abort + | None -> raise Abort | Some word -> word in let was_deleted = buffer#delete_interactive ~start:backslash ~stop:insert () in |