Changeset 4504 for extensions/pLoader/trunk/src/Uploader/GUI/wxChoiceFilteredPanel.pm

Timestamp:

Dec 16, 2009, 9:20:29 PM (14 years ago)

Author:

ronosman

Message:

Feature 1332 added : new list and thumbnail display mode for photo selection.

File:

• extensions/pLoader/trunk/src/Uploader/GUI/wxChoiceFilteredPanel.pm (modified) (6 diffs)

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

@@ -71 +71 @@
     $self->_init_panel;
     $self->_init_properties($params);
-printf("%s, %s\n", $self, $self->GetId);
+
     $self->Refresh;
 
@@ -164 +164 @@
     my ( $self, $choices ) = @_;
 
+        $self->listchoices->Freeze;
     $self->listchoices->Clear;
     $self->id_lookup({});
@@ -181 +182 @@
         $row++; 
     }@{$choices};
+        $self->listchoices->Thaw;
 
 }
@@ -205 +207 @@
     
     my $choices = $self->choices->();
+    $self->listchoices->Freeze;
     map {
         $self->listchoices->Check($row, 0) ;    
         $row++;
     }@$choices;
-
-        
+    $self->listchoices->Thaw;
 }
 
@@ -220 +222 @@
     push @$selection, $self->id_from_name->{$selected} if defined $selected;
 
+    $self->listchoices->Freeze;
     map {
         $self->listchoices->Check(
@@ -228 +231 @@
     }
     @{$selection};      
+    $self->listchoices->Thaw;
 }