diff options
| author | Thierry Vignaud <tvignaud@mandriva.org> | 2004-02-12 23:24:41 +0000 |
|---|---|---|
| committer | Thierry Vignaud <tvignaud@mandriva.org> | 2004-02-12 23:24:41 +0000 |
| commit | b56317b12e3143172527d6fd9276ce57aa517a65 (patch) | |
| tree | a10886f7460b84647865f2e72e1f3e0743c3216b /perl-install/standalone | |
| parent | 8e37fcd4211fb3dc52d9ea6f805faf934a10d265 (diff) | |
| download | drakx-b56317b12e3143172527d6fd9276ce57aa517a65.tar drakx-b56317b12e3143172527d6fd9276ce57aa517a65.tar.gz drakx-b56317b12e3143172527d6fd9276ce57aa517a65.tar.bz2 drakx-b56317b12e3143172527d6fd9276ce57aa517a65.tar.xz drakx-b56317b12e3143172527d6fd9276ce57aa517a65.zip | |
(DrawPointAt) simplify draw_points call
Diffstat (limited to 'perl-install/standalone')
| -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 8ed295472..a6e7cebe0 100755 --- a/perl-install/standalone/drakclock +++ b/perl-install/standalone/drakclock @@ -357,7 +357,7 @@ sub DrawPointAt { my ($pixmap, $black_gc, $nHour, $cx, $cy) = @_; my $dRadians = $nHour * $PI / 30; - Gtk2::Gdk::Drawable::draw_points($pixmap, $black_gc, + $pixmap->draw_points($black_gc, $cx + 95/100 * $radius * sin($dRadians), $cy - 95/100 * $radius * cos($dRadians)) } |