It's a good point, I didn't want to get involved with this 'yet another option' thing but your view menu idea makes sense... then it would mean on click -> foreach win $all_chat_windows { pack forget [GetButtonBarForWin $win] }
(or pack instead of pack forget) KKRT On Mon, Apr 30, 2007 at 11:08:59PM +0200, Karel Demeyer wrote: > By the way, I don't want to sound arrogant or something and I really > appreciate your work, Dan; it's just my "interface designer"'s view on it > :) > > Friendly greeting, > > Karel. > > 2007/4/30, Karel Demeyer <[EMAIL PROTECTED]>: > > > >I didn't apply the patch but it looks like it adds yet another option to > >the preferences window. We should have a procedure of having a discussion > >about every option added there to avoid that window to be overcrowded. > >So; why isn't it just having a checkbox in the chatwindow's "View" menu to > >enable/disable the bar in {that particular window / all windows} (choose > >the > >one you think that is best) and this option being remembered (being a > >::config var) ? > > > >Karel. > > > >2007/4/30, Youness Alaoui <[EMAIL PROTECTED]>: > >> > >> It looks good, but I would say that maybe it would be better to just > >> create an empty frame instead of removing > >> the buttonbar.. > >> the reason is that if you send the event for the chat window to the > >> plugins and you don't specify the buttons > >> variable, plugins might bug because they expect it to exist. > >> By setting an empty frame, you allow them to still depend on that > >> variable without crashing.. > >> or a better solution, just keep the code as it was, but don't do the > >> pack.. the buttonbar will be created but as > >> long as it's not packed, it won't appear... > >> I think that's the best solution... > >> can you patch your patch (:p) and send me the new patch so I can apply > >> it? thanks > >> > >> p.s.: about lang keys, I don't know the exact procedures, but I think > >> you should just provide the english > >> translation and leave the translators the task to translate it (allows > >> for a better coherence in translation).. > >> you could also maybe post to amsn-lang with your translations after > >> reading the translation HOWTO, or finally, > >> wait until Alvaro or Vivia answer this thread and tell you what to do > >> for the translation.. I think they'll say > >> to keep it as is and to apply the patch with the translations in one > >> shot. > >> p.p.s: > >> langen: showbuttonbar Show button bar in chats > >> I would say "in chat windows".. and the french translation "dnas les > >> causeries" lol, I'd say "dans les fenetres > >> de conversation", who calls them 'causerie' ? anyways, maybe someone > >> should review the translations after all.. > >> :) > >> > >> Thanks a lot for the patch, it's great to see contributions :) > >> > >> KKRT > >> > >> > >> On Mon, Apr 30, 2007 at 08:04:13PM +0100, Dan Searle wrote: > >> > Hi, > >> > I noticed in the TODO list there was a item of "Option to display > >> > or not the chat button bar". I have implemented this and done the > >> > relevant translations for French and Spanish, However I'm not totally > >> > sure of their accuracy. So if someone could be kind to apply my patch > >> > :). And if anyone wants to help with any translations that would be > >> > appreciated. > >> > > >> > === showhidechatbar.patch === > >> > > >> > Index: chatwindow.tcl > >> > =================================================================== > >> > --- chatwindow.tcl (revision 8527) > >> > +++ chatwindow.tcl (working copy) > >> > @@ -1904,12 +1904,16 @@ > >> > > >> > # Create the other widgets for the bottom frame > >> > set input [CreateInputFrame $w $leftframe] > >> > - set buttons [CreateButtonBar $w $leftframe] > >> > set picture [CreatePictureFrame $w $bottom] > >> > > >> > - pack $buttons -side top -expand false -fill x -anchor > >> n \ > >> > - -padx [::skin::getKey > >> chat_buttons_padx] \ > >> > - -pady [::skin::getKey > >> chat_buttons_pady] > >> > + if {[::config::getKey ShowButtonBar] == 1 } { > >> > + set buttons [CreateButtonBar $w $leftframe] > >> > + > >> > + pack $buttons -side top -expand false -fill x > >> > -anchor n \ > >> > + -padx [::skin::getKey > >> > chat_buttons_padx] \ > >> > + -pady [::skin::getKey > >> > chat_buttons_pady] > >> > + } > >> > + > >> > pack $input -side top -expand true -fill both -anchor n > >> \ > >> > -padx [::skin::getKey chat_input_padx] > >> \ > >> > -pady [::skin::getKey chat_input_pady] > >> > @@ -1925,7 +1929,9 @@ > >> > > >> > #send chatwininput postevent > >> > set evPar(input) $input > >> > - set evPar(buttons) $buttons > >> > + if {[::config::getKey ShowButtonBar] == 1 } { > >> > + set evPar(buttons) $buttons > >> > + } > >> > set evPar(picture) $picture > >> > set evPar(window) "$w" > >> > > >> > Index: lang/langen > >> > =================================================================== > >> > --- lang/langen (revision 8527) > >> > +++ lang/langen (working copy) > >> > @@ -752,6 +752,7 @@ > >> > shareswebcam Shares webcam > >> > showbanner Show aMSN's banner > >> > showblockedlist Show list of people who blocked you > >> > +showbuttonbar Show button bar in chats > >> > showcachedpics Show cached display pictures > >> > show_contactdps_in_cl Show thumbnails of contacts Display Pictures in > >> > Contact List > >> > showcontactemail Show Contacts with E-mail > >> > Index: lang/langes > >> > =================================================================== > >> > --- lang/langes (revision 8527) > >> > +++ lang/langes (working copy) > >> > @@ -756,6 +756,7 @@ > >> > shareswebcam Usuario con cámara web > >> > showbanner Mostrar el cartel de aMSN en la lista de contactos > >> > showblockedlist Mostrar contactos que te bloquean > >> > +showbuttonbar Mostrar la barra del botón en charlas > >> > showcachedpics Mostrar imágenes para mostrar almacenadas > >> > show_contactdps_in_cl Mostrar miniaturas de las imágenes para > >mostrar > >> > en la lista de contactos > >> > showcontactemail Mostrar el email de los contactos > >> > Index: lang/langfr > >> > =================================================================== > >> > --- lang/langfr (revision 8527) > >> > +++ lang/langfr (working copy) > >> > @@ -752,6 +752,7 @@ > >> > shareswebcam Possède une webcam > >> > showbanner Affiche la bannière d'aMSN > >> > showblockedlist Voir la liste des personnes que vous avez bloqué > >> > +showbuttonbar Montrer la barre de bouton dans les causeries > >> > showcachedpics Afficher/Masquer les avatars cachés > >> > show_contactdps_in_cl Montrer les avatars dans la liste des contacts > >> > showcontactemail Voir les contacts par leur email > >> > Index: preferences.tcl > >> > =================================================================== > >> > --- preferences.tcl (revision 8527) > >> > +++ preferences.tcl (working copy) > >> > @@ -1698,8 +1698,12 @@ > >> > pack $lfname.4.mdy $lfname.4.dmy $lfname.4.ymd -side left -padx > >> 10 > >> > > >> > checkbutton $lfname.5.dock -text "[trans trayicon]" -onvalue 1 > >> > -offvalue 0 -variable [::config::getVar dock] > >> > + > >> > + checkbutton $lfname.5.showbuttonbar -text "[trans > >> > showbuttonbar]" -onvalue 1 -offvalue 0 -variable [::config::getVar > >> dock] > >> > + > >> > > >> > pack $lfname.5.dock -anchor w -side top -padx 10 -pady 0 > >> > + pack $lfname.5.showbuttonbar -anchor w -side top -padx 10 > >> -pady 0 > >> > pack $lfname.5 -side top -padx 0 -pady 0 -expand 1 -fill both > >> > > >> > label $lfname.6.llook -text "[trans psmplace]" -padx 10 > >> > @@ -1710,7 +1714,8 @@ > >> > radiobutton $lfname.6.newline -text "[trans psmnewline]" -value > >> > 2 -variable [::config::getVar psmplace] > >> > pack $lfname.6.dontshow $lfname.6.atend $lfname.6.newline > >> > -anchor w -side top -padx 10 > >> > > >> > - > >> > + > >> > + > >> > ## Emoticons Frame ## > >> > set lfname [labelframe $frm.lfname2 -text [trans prefemotic]] > >> > pack $frm.lfname2 -anchor n -side top -expand 0 -fill x > >> > Index: config.tcl > >> > =================================================================== > >> > --- config.tcl (revision 8527) > >> > +++ config.tcl (working copy) > >> > @@ -43,6 +43,7 @@ > >> > > >> > ;#Changed later for windows to 4 > >> > ::config::setKey showmailicon 1 > >> > ::config::setKey dock 1 > >> > + ::config::setKey ShowButtonBar 1 > >> > ::config::setKey show_contactdps_in_cl 0 > >> > > >> > ::config::setKey autoresizedp 0 > >> > Index: TODO > >> > =================================================================== > >> > --- TODO (revision 8527) > >> > +++ TODO (working copy) > >> > @@ -48,7 +48,7 @@ > >> > ************************************************ > >> > > >> > ** General issues ** > >> > -- Option to display or not the chat button bar > >> > +DONE Option to display or not the chat button bar > >> > - Add option to modify keepalive interval (in seconds) > >> > DONE Make a Pure PNG Reader (will be used for buddy icons + > >> > filetransfer previews, and maybe other stuff) > >> > DONE In the Privacy tab, if 2 users have exactly the same nickname > >> in > >> > a listbox, we can control only the first user > >> > > >> > >> > Index: chatwindow.tcl > >> > =================================================================== > >> > --- chatwindow.tcl (revision 8527) > >> > +++ chatwindow.tcl (working copy) > >> > @@ -1904,12 +1904,16 @@ > >> > > >> > # Create the other widgets for the bottom frame > >> > set input [CreateInputFrame $w $leftframe] > >> > - set buttons [CreateButtonBar $w $leftframe] > >> > set picture [CreatePictureFrame $w $bottom] > >> > > >> > - pack $buttons -side top -expand false -fill x -anchor n > >> \ > >> > - -padx [::skin::getKey chat_buttons_padx] > >> \ > >> > - -pady [::skin::getKey chat_buttons_pady] > >> > + if {[::config::getKey ShowButtonBar] == 1 } { > >> > + set buttons [CreateButtonBar $w $leftframe] > >> > + > >> > + pack $buttons -side top -expand false -fill x > >> -anchor n \ > >> > + -padx [::skin::getKey > >> chat_buttons_padx] \ > >> > + -pady [::skin::getKey > >> chat_buttons_pady] > >> > + } > >> > + > >> > pack $input -side top -expand true -fill both -anchor n > >> \ > >> > -padx [::skin::getKey chat_input_padx] \ > >> > -pady [::skin::getKey chat_input_pady] > >> > @@ -1925,7 +1929,9 @@ > >> > > >> > #send chatwininput postevent > >> > set evPar(input) $input > >> > - set evPar(buttons) $buttons > >> > + if {[::config::getKey ShowButtonBar] == 1 } { > >> > + set evPar(buttons) $buttons > >> > + } > >> > set evPar(picture) $picture > >> > set evPar(window) "$w" > >> > > >> > Index: lang/langen > >> > =================================================================== > >> > --- lang/langen (revision 8527) > >> > +++ lang/langen (working copy) > >> > @@ -752,6 +752,7 @@ > >> > shareswebcam Shares webcam > >> > showbanner Show aMSN's banner > >> > showblockedlist Show list of people who blocked you > >> > +showbuttonbar Show button bar in chats > >> > showcachedpics Show cached display pictures > >> > show_contactdps_in_cl Show thumbnails of contacts Display Pictures in > >> Contact List > >> > showcontactemail Show Contacts with E-mail > >> > Index: lang/langes > >> > =================================================================== > >> > --- lang/langes (revision 8527) > >> > +++ lang/langes (working copy) > >> > @@ -756,6 +756,7 @@ > >> > shareswebcam Usuario con c??mara web > >> > showbanner Mostrar el cartel de aMSN en la lista de contactos > >> > showblockedlist Mostrar contactos que te bloquean > >> > +showbuttonbar Mostrar la barra del bot?n en charlas > >> > showcachedpics Mostrar im??genes para mostrar almacenadas > >> > show_contactdps_in_cl Mostrar miniaturas de las im??genes para > >> mostrar en la lista de contactos > >> > showcontactemail Mostrar el email de los contactos > >> > Index: lang/langfr > >> > =================================================================== > >> > --- lang/langfr (revision 8527) > >> > +++ lang/langfr (working copy) > >> > @@ -752,6 +752,7 @@ > >> > shareswebcam Poss?de une webcam > >> > showbanner Affiche la banni?re d'aMSN > >> > showblockedlist Voir la liste des personnes que vous avez bloqu? > >> > +showbuttonbar Montrer la barre de bouton dans les causeries > >> > showcachedpics Afficher/Masquer les avatars cach?s > >> > show_contactdps_in_cl Montrer les avatars dans la liste des contacts > >> > showcontactemail Voir les contacts par leur email > >> > Index: preferences.tcl > >> > =================================================================== > >> > --- preferences.tcl (revision 8527) > >> > +++ preferences.tcl (working copy) > >> > @@ -1698,8 +1698,12 @@ > >> > pack $lfname.4.mdy $lfname.4.dmy $lfname.4.ymd -side left -padx > >> 10 > >> > > >> > checkbutton $lfname.5.dock -text "[trans trayicon]" -onvalue 1 > >> -offvalue 0 -variable [::config::getVar dock] > >> > + > >> > + checkbutton $lfname.5.showbuttonbar -text "[trans > >> showbuttonbar]" -onvalue 1 -offvalue 0 -variable [::config::getVar dock] > >> > + > >> > > >> > pack $lfname.5.dock -anchor w -side top -padx 10 -pady 0 > >> > + pack $lfname.5.showbuttonbar -anchor w -side top -padx 10 -pady > >> 0 > >> > pack $lfname.5 -side top -padx 0 -pady 0 -expand 1 -fill both > >> > > >> > label $lfname.6.llook -text "[trans psmplace]" -padx 10 > >> > @@ -1710,7 +1714,8 @@ > >> > radiobutton $lfname.6.newline -text "[trans psmnewline]" -value > >> 2 -variable [::config::getVar psmplace] > >> > pack $lfname.6.dontshow $lfname.6.atend $lfname.6.newline > >> -anchor w -side top -padx 10 > >> > > >> > - > >> > + > >> > + > >> > ## Emoticons Frame ## > >> > set lfname [labelframe $frm.lfname2 -text [trans prefemotic]] > >> > pack $frm.lfname2 -anchor n -side top -expand 0 -fill x > >> > Index: config.tcl > >> > =================================================================== > >> > --- config.tcl (revision 8527) > >> > +++ config.tcl (working copy) > >> > @@ -43,6 +43,7 @@ > >> > > >> ;#Changed later for windows to 4 > >> > ::config::setKey showmailicon 1 > >> > ::config::setKey dock 1 > >> > + ::config::setKey ShowButtonBar 1 > >> > ::config::setKey show_contactdps_in_cl 0 > >> > > >> > ::config::setKey autoresizedp 0 > >> > Index: TODO > >> > =================================================================== > >> > --- TODO (revision 8527) > >> > +++ TODO (working copy) > >> > @@ -48,7 +48,7 @@ > >> > ************************************************ > >> > > >> > ** General issues ** > >> > -- Option to display or not the chat button bar > >> > +DONE Option to display or not the chat button bar > >> > - Add option to modify keepalive interval (in seconds) > >> > DONE Make a Pure PNG Reader (will be used for buddy icons + > >> filetransfer previews, and maybe other stuff) > >> > DONE In the Privacy tab, if 2 users have exactly the same nickname in > >> a listbox, we can control only the first user > >> > >> > > >> ------------------------------------------------------------------------- > >> > This SF.net email is sponsored by DB2 Express > >> > Download DB2 Express C - the FREE version of DB2 express and take > >> > control of your XML. No limits. Just data. Click to get it now. > >> > http://sourceforge.net/powerbar/db2/ > >> > _______________________________________________ > >> > Amsn-devel mailing list > >> > Amsn-devel@lists.sourceforge.net > >> > https://lists.sourceforge.net/lists/listinfo/amsn-devel > >> > >> > >> ------------------------------------------------------------------------- > >> > >> This SF.net email is sponsored by DB2 Express > >> Download DB2 Express C - the FREE version of DB2 express and take > >> control of your XML. No limits. Just data. Click to get it now. > >> http://sourceforge.net/powerbar/db2/ > >> _______________________________________________ > >> Amsn-devel mailing list > >> Amsn-devel@lists.sourceforge.net > >> https://lists.sourceforge.net/lists/listinfo/amsn-devel > >> > > > > > ------------------------------------------------------------------------- > This SF.net email is sponsored by DB2 Express > Download DB2 Express C - the FREE version of DB2 express and take > control of your XML. No limits. Just data. Click to get it now. > http://sourceforge.net/powerbar/db2/ > _______________________________________________ > Amsn-devel mailing list > Amsn-devel@lists.sourceforge.net > https://lists.sourceforge.net/lists/listinfo/amsn-devel ------------------------------------------------------------------------- This SF.net email is sponsored by DB2 Express Download DB2 Express C - the FREE version of DB2 express and take control of your XML. No limits. Just data. Click to get it now. http://sourceforge.net/powerbar/db2/ _______________________________________________ Amsn-devel mailing list Amsn-devel@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/amsn-devel