[ViewVC] Diff of: cvs/deliantra/Deliantra-Client/DC/UI.pm

Comparing deliantra/Deliantra-Client/DC/UI.pm (file contents):
Revision 1.478 by root, Tue Dec 22 00:35:44 2009 UTC vs.
Revision 1.481 by root, Tue Oct 12 05:11:38 2010 UTC

 package DC::UI;
-use utf8;
+use common::sense;
-use strict;
 use List::Util ();
 use Guard ();
 #############################################################################
 package DC::UI::Base;
-use strict;
+use common::sense;
 use DC::OpenGL;
 sub new {
    my $class = shift;
 package DC::UI::DrawBG;
 our @ISA = DC::UI::Base::;
-use strict;
+use common::sense;
 use DC::OpenGL;
 sub new {
    my $class = shift;
 #############################################################################
 package DC::UI::Slider;
-use strict;
+use common::sense;
 use DC::OpenGL;
 our @ISA = DC::UI::DrawBG::;
    if ($GRAB == $self) {
       my ($x, $w) = $self->{vertical} ? ($y, $self->{h}) : ($x, $self->{w});
       my (undef, $lo, $hi, $page) = @{$self->{range}};
-      $x = ($x - $self->{click}[1]) / ($w * $self->{scale});
+      $x = ($x - $self->{click}[1]) / ($w * $self->{scale} || 1e999);
       $self->set_value ($self->{click}[0] + $x * ($hi - $page - $lo));
    } else {
       return 0;
    }

-–
+Removed lines
-+
+Added lines
-<
+Changed lines
->
+Changed lines