Tom,

can you try to get a normal working button by disabling all options from
the button command until you at least have a button that has an image,
then re-adding the options to see which ones gives you a problem?

Sander

On Mon, 2007-02-19 at 20:03 +0000, Tom Hennigan wrote:
> Lol :-P I just changed the label to button in the statements below  
> that comment. Here's the diff:
> 
> Index: chatwindow.tcl
> ===================================================================
> --- chatwindow.tcl      (revision 7978)
> +++ chatwindow.tcl      (working copy)
> @@ -2149,41 +2149,41 @@
>                  #Buttons are now labels, to get nicer interface on  
> Mac OS X
>                  #Smiley button
> -               label $smileys  -image [::skin::loadPixmap butsmile] - 
> relief flat -padx 0 \
> +               button $smileys  -image [::skin::loadPixmap butsmile]  
> -relief flat -padx 0 \
>                          -background [::skin::getKey buttonbarbg] - 
> highlightthickness 0 -borderwidth 0 \
>                          -highlightbackground [::skin::getKey  
> buttonbarbg]  -activebackground [::skin::getKey buttonbarbg]
>                  set_balloon $smileys [trans insertsmiley]
>                  #Font button
> -               label $fontsel -image [::skin::loadPixmap butfont] - 
> relief flat -padx 0 \
> +               button $fontsel -image [::skin::loadPixmap butfont] - 
> relief flat -padx 0 \
>                          -background [::skin::getKey buttonbarbg] - 
> highlightthickness 0 -borderwidth 0\
>                          -highlightbackground [::skin::getKey  
> buttonbarbg] -activebackground [::skin::getKey buttonbarbg]
>                  set_balloon $fontsel [trans changefont]
> -               label $voice -image [::skin::loadPixmap butvoice] - 
> relief flat -padx 0 \
> +               button $voice -image [::skin::loadPixmap butvoice] - 
> relief flat -padx 0 \
>                          -background [::skin::getKey buttonbarbg] - 
> highlightthickness 0 -borderwidth 0\
>                          -highlightbackground [::skin::getKey  
> buttonbarbg] -activebackground [::skin::getKey buttonbarbg]
>                  set_balloon $voice [trans sendvoice]
>                  #Block button
> -               label $block -image [::skin::loadPixmap butblock] - 
> relief flat -padx 0 \
> +               button $block -image [::skin::loadPixmap butblock] - 
> relief flat -padx 0 \
>                          -background [::skin::getKey buttonbarbg] - 
> highlightthickness 0 -borderwidth 0\
>                          -highlightbackground [::skin::getKey  
> buttonbarbg] -activebackground [::skin::getKey buttonbarbg]
>                  set_balloon $block "-- 
> command--::ChatWindow::SetBlockText $w"
>                  #Send file button
> -               label $sendfile -image [::skin::loadPixmap butsend] - 
> relief flat -padx 0 \
> +               button $sendfile -image [::skin::loadPixmap butsend] - 
> relief flat -padx 0 \
>                          -background [::skin::getKey buttonbarbg] - 
> highlightthickness 0 -borderwidth 0\
>                          -highlightbackground [::skin::getKey  
> buttonbarbg] -activebackground [::skin::getKey buttonbarbg]
>                  set_balloon $sendfile [trans sendfile]
>                  #Invite another contact button
> -               label $invite -image [::skin::loadPixmap butinvite] - 
> relief flat -padx 0 \
> +               button $invite -image [::skin::loadPixmap butinvite] - 
> relief flat -padx 0 \
>                          -background [::skin::getKey buttonbarbg] - 
> highlightthickness 0 -borderwidth 0\
>                          -highlightbackground [::skin::getKey  
> buttonbarbg] -activebackground [::skin::getKey buttonbarbg]
>                  set_balloon $invite [trans invite]
>                  #Webcam button
> -               label $webcam -image [::skin::loadPixmap butwebcam] - 
> relief flat -padx 0 \
> +               button $webcam -image [::skin::loadPixmap butwebcam] - 
> relief flat -padx 0 \
>                          -background [::skin::getKey buttonbarbg] - 
> highlightthickness 0\
>                           -borderwidth 0 -highlightbackground  
> [::skin::getKey buttonbarbg]\
>                           -activebackground [::skin::getKey buttonbarbg]
> 
> 
> On 19 Feb 2007, at 19:25, Youness Alaoui wrote:
> 
> > Obviously it's not working, lol :p maybe you did something wrong...  
> > can we see the diff ?
> > thx
> >
> >
> > On Mon, Feb 19, 2007 at 05:40:03PM +0000, Tom Hennigan wrote:
> >> Weird because with button I get this (the winks plugin uses label):
> >>
> >> On 19 Feb 2007, at 17:33, [EMAIL PROTECTED] wrote:
> >>
> >>> IIRC, it was to get rid of extra padding that buttons had which
> >>> couldn't be removed...
> >>>
> >>> On 19/02/07, Tom Hennigan < [EMAIL PROTECTED]> wrote:
> >>> I'll check it out now.
> >>>
> >>> On 19 Feb 2007, at 10:57, Sander Hoentjen wrote:
> >>>
> >>>> On Mon, 2007-02-19 at 05:35 -0500, Youness Alaoui wrote:
> >>>>> depends on the tcl/tk version you're using I suppose and even if
> >>>>> we test it with 8.4/8.5 who knows if we can
> >>>>> always be forward compatible, it's a though call and I wouldn't
> >>>>> make it...
> >>>>>
> >>>>> about button with -relief flat, I agree, but they were already
> >>>>> with a -relief flat so I suppose it has some
> >>>>> differences.. also, I can't guarantee how it would look like with
> >>>>> Chameleon...
> >>>>
> >>>> Well I really think we should first look at exactly why we can't  
> >>>> use
> >>>> buttons. It seems to me like we are trying to fix the wrong problem
> >>>> here. If we can use buttons the problem is solved.
> >>>> So someone on mac, please change label to button and tell us what
> >>> the
> >>>> problem is exactly.
> >>>> (file chatwindow.tcl, search for "#Buttons are now labels, to get
> >>>> nicer
> >>>> interface on Mac OS X")
> >>>> Just change one or 2 label to button so you can easily spot the
> >>>> difference.
> >>>>
> >>>> Sander
> >>>>
> >>>>
> >>>>
> >>> -------------------------------------------------------------------- 
> >>> --
> >>>> ---
> >>>> Take Surveys. Earn Cash. Influence the Future of IT
> >>>> Join SourceForge.net's Techsay panel and you'll get the chance to
> >>>> share your
> >>>> opinions on IT & business topics through brief surveys-and earn  
> >>>> cash
> >>>> http://www.techsay.com/default.php?
> >>>> page=join.php&p=sourceforge&CID=DEVDEV
> >>>> _______________________________________________
> >>>> Amsn-devel mailing list
> >>>> Amsn-devel@lists.sourceforge.net
> >>>> https://lists.sourceforge.net/lists/listinfo/amsn-devel
> >>>
> >>>
> >>> -------------------------------------------------------------------- 
> >>> --
> >>> ---
> >>> Take Surveys. Earn Cash. Influence the Future of IT
> >>> Join SourceForge.net's Techsay panel and you'll get the chance to
> >>> share your
> >>> opinions on IT & business topics through brief surveys-and earn cash
> >>> http://www.techsay.com/default.php?
> >>> page=join.php&p=sourceforge&CID=DEVDEV
> >>> _______________________________________________
> >>> Amsn-devel mailing list
> >>> Amsn-devel@lists.sourceforge.net
> >>> https://lists.sourceforge.net/lists/listinfo/amsn-devel
> >>>
> >>> -------------------------------------------------------------------- 
> >>> --
> >>> ---
> >>> Take Surveys. Earn Cash. Influence the Future of IT
> >>> Join SourceForge.net's Techsay panel and you'll get the chance to
> >>> share your
> >>> opinions on IT & business topics through brief surveys-and earn cash
> >>> http://www.techsay.com/default.php?
> >>> page=join.php&p=sourceforge&CID=DEVDEV______________________________ 
> >>> __
> >>> _______________
> >>> Amsn-devel mailing list
> >>> Amsn-devel@lists.sourceforge.net
> >>> https://lists.sourceforge.net/lists/listinfo/amsn-devel
> >>
> >
> >> --------------------------------------------------------------------- 
> >> ----
> >> Take Surveys. Earn Cash. Influence the Future of IT
> >> Join SourceForge.net's Techsay panel and you'll get the chance to  
> >> share your
> >> opinions on IT & business topics through brief surveys-and earn cash
> >> http://www.techsay.com/default.php? 
> >> page=join.php&p=sourceforge&CID=DEVDEV
> >> _______________________________________________
> >> Amsn-devel mailing list
> >> Amsn-devel@lists.sourceforge.net
> >> https://lists.sourceforge.net/lists/listinfo/amsn-devel
> >
> >
> > ---------------------------------------------------------------------- 
> > ---
> > Take Surveys. Earn Cash. Influence the Future of IT
> > Join SourceForge.net's Techsay panel and you'll get the chance to  
> > share your
> > opinions on IT & business topics through brief surveys-and earn cash
> > http://www.techsay.com/default.php? 
> > page=join.php&p=sourceforge&CID=DEVDEV
> > _______________________________________________
> > Amsn-devel mailing list
> > Amsn-devel@lists.sourceforge.net
> > https://lists.sourceforge.net/lists/listinfo/amsn-devel
> 
> 
> -------------------------------------------------------------------------
> Take Surveys. Earn Cash. Influence the Future of IT
> Join SourceForge.net's Techsay panel and you'll get the chance to share your
> opinions on IT & business topics through brief surveys-and earn cash
> http://www.techsay.com/default.php?page=join.php&p=sourceforge&CID=DEVDEV
> _______________________________________________
> Amsn-devel mailing list
> Amsn-devel@lists.sourceforge.net
> https://lists.sourceforge.net/lists/listinfo/amsn-devel


-------------------------------------------------------------------------
Take Surveys. Earn Cash. Influence the Future of IT
Join SourceForge.net's Techsay panel and you'll get the chance to share your
opinions on IT & business topics through brief surveys-and earn cash
http://www.techsay.com/default.php?page=join.php&p=sourceforge&CID=DEVDEV
_______________________________________________
Amsn-devel mailing list
Amsn-devel@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/amsn-devel

Reply via email to