Mirrors_Framework/paparazzi
1
0
Fork 0
mirror of https://github.com/paparazzi/paparazzi.git synced 2026-06-04 13:55:40 +08:00
Code Issues Actions 28 Packages Projects Releases Wiki Activity

[messages] disable message frame sensitivity during drag

Browse Source 
- it also disable update of new message
- it can solve a bit of #966
This commit is contained in:
Gautier Hattenberger
2014-12-03 16:24:12 +01:00
parent d3494f6ff9
commit b550d1f8ca
1 changed files with 2 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files
sw/ground_segment/tmtc/messages.ml
+2
View File
@@ -98,6 +98,8 @@ let one_page = fun sender class_name (notebook:GPack.notebook) bind m ->
field_name in
sel#return (sprintf "%s:%s:%s:%s:%s" sender class_name id field_descr scale) in
ignore (field_label#drag#connect#data_get ~callback:data_get);
ignore (field_label#drag#connect#beginning ~callback:(fun _ -> notebook#coerce#misc#set_sensitive false));
ignore (field_label#drag#connect#ending ~callback:(fun _ -> notebook#coerce#misc#set_sensitive true));
(update, display_value)::rest
with