20110330-0926

forsyth committed 15 years ago

Commit ef949cd1 parent ce72ccb6 files · +7 −5Browse files

Unified · Split

6 files

CHANGES +2 −0
include/version.h +1 −1
libtk/buton.c +1 −1
libtk/listb.c +1 −1
libtk/menus.c +1 −1
libtk/scale.c +1 −1

@@ -1,3 +1,5 @@
	1	+20110330
	2	+ call strtol not atoi for hex numbers [issue 255, mechiel]
1	3	20110329
2	4	utils/mkdir/mkdir.c - add -p option [mechiel, issue 250]
3	5	emu/Linux/mkfile - try searching -lpthread after -lrt for sem_* [issue 247]

include/version.h+1−1

@@ -1 +1 @@
1		−#define VERSION "Fourth Edition (20110329)"
	1	+#define VERSION "Fourth Edition (20110330)"

libtk/buton.c+1−1

@@ -584,7 +584,7 @@ tkbuttonkey(Tk tk, char arg, char **val) · 583 unmodified lines
584	584	if(tk->flag & Tkdisabled)
585	585	return nil;
586	586
587		− key = atoi(arg);
	587	+ key = strtol(arg, nil, 0);
588	588	if (key == '\n' \|\| key ==' ')
589	589	return tkbuttoninvoke(tk, nil, val);
590	590	return nil;

libtk/listb.c+1−1

@@ -999,7 +999,7 @@ tklistbkey(Tk tk, char arg, char **val) · 998 unmodified lines
999	999	if(tk->flag & Tkdisabled)
1000	1000	return nil;
1001	1001
1002		− key = atoi(arg);
	1002	+ key = strtol(arg, nil, 0);
1003	1003	active = 0;
1004	1004	for (e = l->head; e != nil; e = e->link) {
1005	1005	if (e->flag & Tkactive)

libtk/menus.c+1−1

@@ -449,7 +449,7 @@ tkMBkey(Tk tk, char arg, char **val) · 448 unmodified lines
449	449	if(tk->flag & Tkdisabled)
450	450	return nil;
451	451
452		− key = atoi(arg);
	452	+ key = strtol(arg, nil, 0);
453	453	if (key == '\n' \|\| key == ' ')
454	454	return tkMBpress(tk, "1", nil);
455	455	return nil;

libtk/scale.c+1−1

@@ -926,7 +926,7 @@ tkscalekey(Tk tk, char arg, char **val) · 925 unmodified lines
926	926	if(tk->flag & Tkdisabled)
927	927	return nil;
928	928
929		− key = atoi(arg);
	929	+ key = strtol(arg, nil, 0);
930	930	if (key == Up \|\| key == Left)
931	931	pos = trough1;
932	932	else if (key == Down \|\| key == Right)