← Back to branch summary

~ubuntu-branches/ubuntu/raring/perl-tk/raring

« back to all changes in this revision

Viewing changes to pTk/mTk/win/tkWinEmbed.c

  • Committer: Bazaar Package Importer
  • Author(s): Colin Tuckley
  • Date: 2008-02-15 13:56:59 UTC
  • mfrom: (1.1.3 upstream) (4.1.1 hardy)
  • Revision ID: james.westby@ubuntu.com-20080215135659-ru2oqlykuju20fav
Tags: 1:804.028-1
http://bugs.debian.org/463080
http://bugs.debian.org/411129
* New Upstream Release (Closes: #463080).
* Update to Debhelper v5.
* Build with XFT=1 (Closes: #411129).

Show diffs side-by-side

added added

removed removed

Lines of Context:
pTk/mTk/win/tkWinEmbed.c
160
160
    }
161
161
 
162
162
    if (Tcl_GetIntFromObj(interp, string, &id) != TCL_OK) {
163
 
        return TCL_ERROR;
 
163
        char *s = Tcl_GetString(string);
 
164
        char *e = NULL;
 
165
        id = strtoul(s,&e,0);
 
166
        if (!e || *e)
 
167
            return TCL_ERROR;
164
168
    }
165
169
    hwnd = (HWND) id;
166
170