From: <sc...@us...> - 2007-01-11 19:22:21
|
Revision: 7745 http://svn.sourceforge.net/amsn/?rev=7745&view=rev Author: scapor Date: 2007-01-11 11:22:18 -0800 (Thu, 11 Jan 2007) Log Message: ----------- still some work to do though, like the 2nd action.. whoever feels like Modified Paths: -------------- trunk/amsn/abook.tcl Modified: trunk/amsn/abook.tcl =================================================================== --- trunk/amsn/abook.tcl 2007-01-11 19:19:44 UTC (rev 7744) +++ trunk/amsn/abook.tcl 2007-01-11 19:22:18 UTC (rev 7745) @@ -1094,17 +1094,17 @@ set actions $widget.actions set filepath [lindex [$browser getSelected] 1] -#TODO: set the actions!!! #activate the action buttons now an image is selected $actions.setasmine configure -state active -command [list \ set_displaypic $filepath ] - - $actions.setascustom -state active - $actions.copyfileuri -state active +#TODO: Set as custom dp for this user - action +# $actions.setascustom configure -state active + $actions.copyfileuri configure -state active -command [list clipboard clear ; clipboard append $filepath] } + #menu when right-clicking the user's dp on the first tab proc dp_mypicpopup_menu { X Y filename user} { #if user is self have another menu ? @@ -1455,10 +1455,11 @@ #$nbUserDPs.otherdpscontainer.browser is created in userDPs_raise_cmd frame $actions #TODO: buttons should be pimped to look better - button $actions.setasmine -text "set as mine" -state disabled -justify left + + button $actions.setasmine -text "[trans setasmydp]" -state disabled -justify left button $actions.setascustom -text "set as custom" -state disabled - button $actions.copyfileuri -text "copy uri" -state disabled + button $actions.copyfileuri -text "[trans copytoclipboard [string tolower [trans filename]]]" -state disabled pack $actions.setasmine $actions.setascustom $actions.copyfileuri -anchor w -fill x pack $actions -side left This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site. |