summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorFrédéric Buclin <LpSolit@gmail.com>2017-03-26 15:06:21 +0200
committerFrédéric Buclin <LpSolit@gmail.com>2017-03-26 15:06:21 +0200
commited57879762a172eeb066eda42beba8abba6fa2f2 (patch)
tree9bda80a2359b8846824fc1dd29e1f316351b0c24 /perl-install
parenta1e529eb32909581343dd1335dfb1f8cc55fb2a6 (diff)
downloaddrakx-ed57879762a172eeb066eda42beba8abba6fa2f2.tar
drakx-ed57879762a172eeb066eda42beba8abba6fa2f2.tar.gz
drakx-ed57879762a172eeb066eda42beba8abba6fa2f2.tar.bz2
drakx-ed57879762a172eeb066eda42beba8abba6fa2f2.tar.xz
drakx-ed57879762a172eeb066eda42beba8abba6fa2f2.zip
Minutes are sometimes incorrectly displayed due to rounding errors
Diffstat (limited to 'perl-install')
-rwxr-xr-xperl-install/standalone/drakclock2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/standalone/drakclock b/perl-install/standalone/drakclock
index deb192bd5..f0050e594 100755
--- a/perl-install/standalone/drakclock
+++ b/perl-install/standalone/drakclock
@@ -368,7 +368,7 @@ sub DrawSec {
}
sub DrawMin {
- my $dRadians = POSIX::floor($dRadians_min / $PI * 30) * $PI / 30;
+ my $dRadians = $dRadians_min;
$cairo->set_source_rgb(0.2, 0.2, 0.2);
$cairo->move_to($midx - 3/100 * $radius * sin($dRadians), $midy + 3/100 * $radius * cos($dRadians));
$cairo->line_to($midx - 3/100 * $radius * sin($dRadians+$PI/2), $midy + 3/100 * $radius * cos($dRadians+$PI/2));