Hallo,
I found a bug, related to the changed handling of IC. You hit it by
WRKSPLF, display (option 5) one item (but not the first one). If you
return, the cursor should be set to the same position. But instead it
moves to the first entry field.
I changed session.c:
/* If we've gotten an MC or IC order, set the cursor to that
* position.
* Otherwise set the cursor to the first non-bypass field, if there
* is
* one. If not, set the cursor position to 0,0. */
+ if (tn5250_display_pending_insert (This->display))
+ tn5250_display_set_cursor_home(This->display);
+ else {
if (end_y != 0xff && end_x != 0xff)
.
.
.
+ }
That works for me, so far. But I don't know, if that breaks anything
else.
I also changed cursesterm.c in function curses_terminal_update_indicators
to show the cursor position in the indicators line:
if ((inds & TN5250_DISPLAY_IND_INSERT) != 0) {
memcpy(ind_buf + 30, "IM", 2);
}
+ sprintf(ind_buf+72,"%03.3d/%03.3d",tn5250_display_cursor_x(display)+1,
+ tn5250_display_cursor_y(display)+1);
attrset( (attr_t)COLOR_PAIR(COLOR_WHITE) );
and in function curses_terminal_update:
This->data->last_width = tn5250_display_width(display);
This->data->last_height = tn5250_display_height(display);
- curses_terminal_update_indicators(This, display);
}
+ curses_terminal_update_indicators(This, display);
attrset(A_NORMAL);
Then I found another glitch, which is related to the updates of the
xt5250 script. Bescause xterm is started with the -name xt5250 option it
also reports itself as "xt5250" and the code to test, whether we're running
in an xterm should be adopted:
/* Determine if we're talking to an xterm ;) */
printf ("\x5");
fflush (stdout);
tv.tv_usec = 100;
tv.tv_sec = 0;
select (0, NULL, NULL, NULL, &tv);
- while ((i < 5) && (c = getch ()) != -1) {
+ while ((i < 6) && (c = getch ()) != -1) {
buf[i++] = (char)c;
}
buf[i] = '\0';
if (c != -1) {
while (getch () != -1)
;
}
- This->data->is_xterm = !strcmp (buf, "xterm");
+ This->data->is_xterm = !strcmp (buf, "xt5250");
I'm not shure, if this is also related to the version of xterm, I use
Debian 2.1 with xterm from XFree86 3.3.2.3
--
Esda Feinstrumpffabrik GmbH
Abt. EDV, Frank Richter [EMAIL PROTECTED]
Hauptstr. 76, D-09392 Auerbach IBMMAIL(DEMDK9DK)
+---
| This is the LINUX5250 Mailing List!
| To submit a new message, send your mail to [EMAIL PROTECTED]
| To subscribe to this list send email to [EMAIL PROTECTED]
| To unsubscribe from this list send email to [EMAIL PROTECTED]
| Questions should be directed to the list owner/operator: [EMAIL PROTECTED]
+---
