~ubuntu-branches/ubuntu/natty/perl-tk/natty

« back to all changes in this revision

Viewing changes to pTk/mTk/generic/tkPlace.c

  • Committer: Bazaar Package Importer
  • Author(s): Stephen Zander
  • Date: 2004-03-14 13:54:44 UTC
  • mfrom: (1.1.1 upstream)
  • Revision ID: james.westby@ubuntu.com-20040314135444-prc09u2or4dbr3to
Tags: 1:800.025-2
Add xlibs-dev to Build-Depends:,
Closes: #237942

Show diffs side-by-side

added added

removed removed

Lines of Context:
272
272
        }
273
273
        if (slavePtr->flags & CHILD_REL_WIDTH) {
274
274
            Tcl_AppendElement(interp,"-relwidth");
275
 
            Tcl_IntResults(interp,1,1, slavePtr->relWidth);
 
275
            Tcl_DoubleResults(interp,1,1, slavePtr->relWidth);
276
276
        } else {
277
277
            Tcl_AppendElement(interp,"-relwidth");
278
278
            Tcl_AppendElement(interp,"");
286
286
        }
287
287
        if (slavePtr->flags & CHILD_REL_HEIGHT) {
288
288
            Tcl_AppendElement(interp,"-relheight");
289
 
            Tcl_IntResults(interp,1,1, slavePtr->relHeight);
 
289
            Tcl_DoubleResults(interp,1,1, slavePtr->relHeight);
290
290
        } else {
291
291
            Tcl_AppendElement(interp,"-relheight");
292
292
            Tcl_AppendElement(interp,"");