Here is a patch to correctly set the filetype to the image we want to save.
 Actually, when you want to save an image from a webcam session, it ask
 you the filetype, but always show PNG Files, .png as filetype.

 Index: msncam.tcl
 ===================================================================
 --- msncam.tcl  (révision 9757)
 +++ msncam.tcl  (copie de travail)
 @@ -3439,8 +3439,29 @@

        proc saveToImageStep2  { w } {
                set img ${w}_img
 +
 +               set imgFormat [ set ::${w}_saveToImageFormat ]
 +               switch -- $imgFormat {
 +                       "cxgif" {
 +                               set type { {"GIF Files" .gif} }
 +                       }
 +                       "cxpng" {
 +                               set type { {"PNG Files" .png} }
 +                       }
 +                       "cxjpg" {
 +                               set type { {"JPEG Files" .jpg} }
 +                       }
 +                       "cxtga" {
 +                               set type { {"TGA Files" .tga} }
 +                       }
 +                       "cximage" -
 +                       default {
 +                               set type { {"All Files" *.*} }
 +                       }
 +               }

 -               set filename [tk_getSaveFile -filetypes {{"PNG files" .png}}]
 +               #set filename [tk_getSaveFile -filetypes {{"PNG files" .png}}]
 +               set filename [tk_getSaveFile -filetypes $type]
                if { $filename != "" } {
                        $img write $filename -format [set
::${w}_saveToImageFormat]
                }



 Good Night

 --

 o May the Force be with you
 o Do it, or not, but there's no try

 http://www.yoda-bzh.net
 http://blog.yoda-bzh.net
-------------------------------------------------------------------------
This SF.net email is sponsored by the 2008 JavaOne(SM) Conference 
Don't miss this year's exciting event. There's still time to save $100. 
Use priority code J8TL2D2. 
http://ad.doubleclick.net/clk;198757673;13503038;p?http://java.sun.com/javaone
_______________________________________________
Amsn-devel mailing list
Amsn-devel@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/amsn-devel

Reply via email to