From: Jerome Gagnon-V. <ger...@us...> - 2005-12-31 08:20:31
|
Update of /cvsroot/amsn/msn/plugins/inkdraw In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv28285/plugins/inkdraw Modified Files: inkdraw.tcl Log Message: Change the place where we save the temp inkdraw file to avoid permission issues Should fix MANY Bugs PLZ test it and give me feedbacks, if it works well I will put it on autoupdate Index: inkdraw.tcl =================================================================== RCS file: /cvsroot/amsn/msn/plugins/inkdraw/inkdraw.tcl,v retrieving revision 1.6 retrieving revision 1.7 diff -C2 -d -r1.6 -r1.7 *** inkdraw.tcl 15 Oct 2005 19:56:14 -0000 1.6 --- inkdraw.tcl 31 Dec 2005 08:20:23 -0000 1.7 *************** *** 266,274 **** set widget $window.f.bottom.left.in.inner.draw ! ! $widget SaveDrawing $HOME "inktosend.gif" ! ! #send the saved file ! ::amsn::InkSend $window [file join $HOME "inktosend.gif"] $widget ClearDrawboard } --- 266,280 ---- set widget $window.f.bottom.left.in.inner.draw ! #Put inktosend picture into a temp directory to send it ! if { [info exists ::env(TEMP) ] } { ! $widget SaveDrawing $::env(TEMP) "inktosend.gif" ! #send the saved file ! ::amsn::InkSend $window [file join $::env(TEMP) "inktosend.gif"] ! } else { ! $widget SaveDrawing "/tmp" "inktosend.gif" ! #send the saved file ! ::amsn::InkSend $window [file join /tmp "inktosend.gif"] ! } ! $widget ClearDrawboard } |