From 48c2bcd8842a77d6fca4a18505e622e9a9d3d38b Mon Sep 17 00:00:00 2001 From: forsyth Date: Wed, 30 Mar 2011 09:26:38 +0100 Subject: 20110330-0926 --- libtk/buton.c | 2 +- libtk/listb.c | 2 +- libtk/menus.c | 2 +- libtk/scale.c | 2 +- 4 files changed, 4 insertions(+), 4 deletions(-) (limited to 'libtk') diff --git a/libtk/buton.c b/libtk/buton.c index 325422b9..ba393ea0 100644 --- a/libtk/buton.c +++ b/libtk/buton.c @@ -584,7 +584,7 @@ tkbuttonkey(Tk *tk, char *arg, char **val) if(tk->flag & Tkdisabled) return nil; - key = atoi(arg); + key = strtol(arg, nil, 0); if (key == '\n' || key ==' ') return tkbuttoninvoke(tk, nil, val); return nil; diff --git a/libtk/listb.c b/libtk/listb.c index df5eea0b..630e6a06 100644 --- a/libtk/listb.c +++ b/libtk/listb.c @@ -999,7 +999,7 @@ tklistbkey(Tk *tk, char *arg, char **val) if(tk->flag & Tkdisabled) return nil; - key = atoi(arg); + key = strtol(arg, nil, 0); active = 0; for (e = l->head; e != nil; e = e->link) { if (e->flag & Tkactive) diff --git a/libtk/menus.c b/libtk/menus.c index ac1d0e42..b8310aba 100644 --- a/libtk/menus.c +++ b/libtk/menus.c @@ -449,7 +449,7 @@ tkMBkey(Tk *tk, char *arg, char **val) if(tk->flag & Tkdisabled) return nil; - key = atoi(arg); + key = strtol(arg, nil, 0); if (key == '\n' || key == ' ') return tkMBpress(tk, "1", nil); return nil; diff --git a/libtk/scale.c b/libtk/scale.c index ca42a106..d2ce8a33 100644 --- a/libtk/scale.c +++ b/libtk/scale.c @@ -926,7 +926,7 @@ tkscalekey(Tk *tk, char *arg, char **val) if(tk->flag & Tkdisabled) return nil; - key = atoi(arg); + key = strtol(arg, nil, 0); if (key == Up || key == Left) pos = trough1; else if (key == Down || key == Right) -- cgit v1.2.3