From abfced29752cf4d282abd983adf827a69518ad84 Mon Sep 17 00:00:00 2001
From: lecoanet
Date: Thu, 27 Jan 2000 15:00:53 +0000
Subject: Correction de l'initialisation du groupe d'antirec.

---
 generic/tkZinc.c | 11 ++++++-----
 1 file changed, 6 insertions(+), 5 deletions(-)

(limited to 'generic/tkZinc.c')

diff --git a/generic/tkZinc.c b/generic/tkZinc.c
index f7d6622..eac81c6 100644
--- a/generic/tkZinc.c
+++ b/generic/tkZinc.c
@@ -344,10 +344,6 @@ RadarCmd(ClientData client_data,	/* Main window associated with
   wi->map_text_font = 0;
   wi->map_distance_symbol = None;
   wi->cursor = None;
-#ifdef OM
-  wi->om_group_id = 1;
-  wi->om_group = RADAR_NO_ITEM;
-#endif
   wi->track_manage_history = False;
   wi->track_managed_history_size = 0;
   wi->speed_vector_length = 0;
@@ -361,6 +357,11 @@ RadarCmd(ClientData client_data,	/* Main window associated with
   Tcl_InitHashTable(wi->t_table, TCL_ONE_WORD_KEYS);  
   wi->obj_id = 1;
   wi->top_group = ITEM_P.CreateItem(wi, RadarGroup, 0, NULL);
+#ifdef OM
+  wi->om_group_id = 0;
+  wi->om_group = wi->top_group;
+  OmRegister((void *) wi, SendTrackToOm, SetLabelAngleFromOm, QueryLabelPosition);
+#endif
   wi->gc = 0;
   wi->draw_buffer = 0;
   wi->events_flags = 0;
@@ -3617,7 +3618,7 @@ Redisplay(ClientData client_data)	/* Information about radar. */
    */
 #ifdef OM
   if ((wi->om_group != RADAR_NO_ITEM) &&
-      ((GroupItem) wi->om_group)->call_om) {
+      ((GroupItem) wi->om_group)->call_om) {  
     RadarPoint scale={1.0,1.0};
     if (wi->om_group->transfo) {
       RadarTransfoDecompose(wi->om_group->transfo, &scale,
-- 
cgit v1.1