[Tcl-bugs] [ tcl-Bugs-819227 ] ::tk::PlaceWindow is wrong

[SourceForge.net <no...@so...>]

Bugs item #819227, was opened at 2003-10-07 05:40
Message generated for change (Tracker Item Submitted) made by Item Submitter
You can respond by visiting: 
https://sourceforge.net/tracker/?func=detail&atid=110894&aid=819227&group_id=10894

Category: 37. Init - Library - Autoload
Group: = 8.4.1
Status: Open
Resolution: None
Priority: 5
Submitted By: Nobody/Anonymous (nobody)
Assigned to: Don Porter (dgp)
Summary: ::tk::PlaceWindow is wrong

Initial Comment:
# ::tk::PlaceWindow --
#   place a toplevel at a particular position
# Arguments:
#   toplevel    name of toplevel window
#   ?placement? pointer ?center? ; places $w centered
on the pointer
#               widget widgetPath ; centers $w over
widget_name
#               defaults to placing toplevel in the
middle of the screen

          ^^^^^^^^^^^^^^^  BUG

#   ?anchor?    center or widgetPath
# Results:
#   Returns nothing
#

=> this is wrong because the condition fails ....

a) first condition .....
    [string equal -len [string length $place] $place
"pointer"]
    thist ist true for $place == "" => the default ....
    => pointerplacement ist the default and !not! the
middle of
         the screen

mfg

  aotto

----------------------------------------------------------------------

You can respond by visiting: 
https://sourceforge.net/tracker/?func=detail&atid=110894&aid=819227&group_id=10894