Sophie

Sophie

distrib > Mandriva > 2009.0 > i586 > by-pkgid > 13b7201751e5c0b6b29728b4b6dfb750 > files > 9

perl-Curses-UI-0.96-2mdv2009.0.src.rpm

--- Curses-UI-0.95/lib/Curses/UI/Listbox.pm.pix	2006-12-19 15:25:53.000000000 +0100
+++ Curses-UI-0.95/lib/Curses/UI/Listbox.pm	2006-12-19 15:27:32.000000000 +0100
@@ -509,13 +509,13 @@
 	    my $changed = ($this->{-selected}->{$id} ? 0 : 1);
 	    $this->{-selected}->{$id} = 1;
 	    $this->run_event('-onchange') if $changed;
-	    $this->schedule_draw(1);
+	    $this->schedule_draw(1) if $changed;
 	} else {
 	    my $changed = (not defined $this->{-selected} or
 			   ($this->{-selected} != $id));
 	    $this->{-selected} = $id;
 	    $this->run_event('-onchange') if $changed;
-	    $this->schedule_draw(1);
+	    $this->schedule_draw(1) if $changed;
 	}
     }
     return $this;