Re: [Tcllib-devel] ::ftp::Put patch for STOU and STOT

[bugant <bu...@gm...>]

hi,


On 11/8/06, Andreas Kupries <and...@ac...> wrote:
> The standard behaviour
> for a missing remote file name is to use the name of the local file. Changing

this is indeed true, the patch I've sended do this if you're coping a local file
in fact in that case ftp(inline) will be setted to 0 and you'll do this:

        if {$ftp(inline) == 0} {
            # File transfer

            set ftp(PutData) ""
            if { ![file exists $source] } {
                DisplayMsg $s "File \"$source\" not exist" error
                return 0
            }
            if { $dest == "" } {
                set dest [file tail $source]
            }
            set ftp(LocalFilename) $source
            set ftp(SourceCI) [open $ftp(LocalFilename) r]

so I don't see the need for a -unique option.

> The functionality behind the -hylafax option, this STOT (Store Temp) command,
> seems to be generic enough to me that I would name the option -temp or similar.

ok -temp seems to have more sense than -hylafax.

Cheers,
bugant.