invalid command name "frame"
    while executing
"frame .f"
    (in namespace eval "::request" script line 3)
    invoked from within
"namespace eval ::request $script"
    ("::try" body line 12)
OUTPUT BUFFER:
#!/usr/local/bin/wish

pack [frame .f]
pack [label .f.l -text " Ceci est \n toplevel . " -font "Helvetica 24 bold"]
pack [frame .f.f2]
pack [label .f.f2.l -text " Ceci est \n label .t2.f.f2.l " -font "Helvetica 24 bold"]

toplevel .t2
pack [frame .t2.f]
pack [label .t2.f.l -text " Ceci est \n label .t2.f.l " -font "Helvetica 24 bold"]
pack [frame .t2.f.f2]
pack [label .t2.f.f2.l -text " Hello \n World ! " -font "Helvetica 24 bold"]

puts "label :: [bindtags .t2.f.f2.l]"
puts "frame :: [bindtags .t2.f]"

bind toto  {puts "tag toto"}


bind .f     {puts "%W press %K ."}
bind .t2.f.l  {puts "%W press %K t2"}
bindtags .t2.f.l [linsert [bindtags .t2.f.l] 1 toto]
puts "label :: [bindtags .t2.f.l]"

#bind all  {puts "%W press %K"}
#puts "bindtags .t2 :: [set bt [bindtags .t2]]"
#bindtags .t2 [list .t2]
#puts "bindtags .t2 :: [set bt [bindtags .t2]]"
#bindtags .t2 [linsert [bindtags .t2] 0 toto]