layout/plan-to-gui-data: when $t{Edge}, adjust boundaries of background, to make...

diff --git a/layout/plan-to-gui-data b/layout/plan-to-gui-data
index 2a39c924c52f8de71649e7c8299ddacffb0ae8f8..7f32f85815bbe2a918c0048b4f15c22ab34f3e09 100755 (executable)
--- a/layout/plan-to-gui-data
+++ b/layout/plan-to-gui-data
@@ -198,14 +198,16 @@ sub in_pixel ($) {
     }
 #printf(STDERR "%s 0x%08lx 0x%x 0x%x %d\n",$pp,$datum,
 #       $t{Segnum},$t{Movfeatpos},$t{Edge});
-    if (!$t{Segnum}) {
-       xpmdata_pixel('background','','=')
-           unless $t{Edge};
-       return;
+
+    if ($t{Edge}) {
+       xpmdata_pixel('background','',undef);
+    } elsif ($t{Segnum}) {
+       xpmdata_pixel('background','','!');
     } else {
-       xpmdata_pixel('background','','!')
-           unless $t{Edge};
+       xpmdata_pixel('background','','=');
     }
+    return unless $t{Segnum};
+
     $segname= $segnum_name[$t{Segnum}];
     defined $segname or die "$pp $t{Segnum} $datum";
     $pp.= " $segname";