diff options
author | Frédéric Buclin <LpSolit@gmail.com> | 2017-03-26 15:06:21 +0200 |
---|---|---|
committer | Frédéric Buclin <LpSolit@gmail.com> | 2017-03-26 15:06:21 +0200 |
commit | ed57879762a172eeb066eda42beba8abba6fa2f2 (patch) | |
tree | 9bda80a2359b8846824fc1dd29e1f316351b0c24 /perl-install | |
parent | a1e529eb32909581343dd1335dfb1f8cc55fb2a6 (diff) | |
download | drakx-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-x | perl-install/standalone/drakclock | 2 |
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)); |