Changeset 5977 for extensions/pLoader

Timestamp:

Apr 27, 2010, 4:24:54 PM (14 years ago)

Author:

ronosman

Message:

Bug 1610 fixed : new chunk size not used until reload. Add a number validator.

Location:

extensions/pLoader/trunk/src/Uploader

Files:

• GUI/Frame.pm (modified) (1 diff)
• GUI/wxApp.pm (modified) (1 diff)
• PWG/WebServices.pm (modified) (2 diffs)

extensions/pLoader/trunk/src/Uploader/GUI/Frame.pm

@@ -552 +552 @@
             $main::CHUNK_SIZE => { label => gettext("Transfert chunk size") },
             $main::GS_CHUNK_SIZE => {
-                value   => sub { wxTheApp->chunk_size(@_) },
+                value   => sub { wxTheApp->chunk_size(@_) },
+                validator => Wx::Perl::TextValidator->new( '\d' ) 
             },
             $main::LANGUAGE => { label => gettext("Choose a language") },

extensions/pLoader/trunk/src/Uploader/GUI/wxApp.pm

@@ -694 +694 @@
                 http_password  => $self->http_password,
                 branding       => $self->branding,
-                chunk_size     => $self->chunk_size,
+                chunk_size     => sub { $self->chunk_size(@_) },
                 use_offline    => $self->use_offline,
                 version        => $self->version,

extensions/pLoader/trunk/src/Uploader/PWG/WebServices.pm

@@ -629 +629 @@
 
     my $content_length = length($content);
-    my $nb_chunks = ceil($content_length / $self->chunk_size);
+    my $nb_chunks = ceil($content_length / $self->chunk_size->());
 
     my $chunk_pos = 0;
@@ -640 +640 @@
             $content,
             $chunk_pos,
-            $self->chunk_size
+            $self->chunk_size->()
         );
-        $chunk_pos += $self->chunk_size;
+        $chunk_pos += $self->chunk_size->();
         #print "pwg.images.addChunk\n";
         my $data = encode_base64($chunk);