x-graphics-draw-arc: Add missing parameters.

diff --git a/src/x11/x11-graphics.scm b/src/x11/x11-graphics.scm
index 06feffba108147e184f807183596b24fb381a961..9ca2a0f1ad30a464a5e1e4e76c92f9a5062e0e2f 100644 (file)
--- a/src/x11/x11-graphics.scm
+++ b/src/x11/x11-graphics.scm
@@ -112,13 +112,14 @@ Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA.
   ;; Subsequently move the graphics cursor to those coordinates.
   (C-call "x_graphics_draw_point" window x y))
 
-(define (x-graphics-draw-arc window x y start-angle sweep-angle fill?)
+(define (x-graphics-draw-arc window x y radius-x radius-y
+                            start-angle sweep-angle fill?)
   ;; Draw an arc at the given coordinates, with given X and Y radii.
   ;; START-ANGLE and SWEEP-ANGLE are in degrees, anti-clocwise.
   ;; START-ANGLE is from 3 o'clock, and SWEEP-ANGLE is relative to the
   ;; START-ANGLE.  If FILL? is true, the arc is filled.
   (C-call "x_graphics_draw_arc" window
-         x y start-angle sweep-angle (if fill? 1 0)))
+         x y radius-x radius-y start-angle sweep-angle (if fill? 1 0)))
 
 (define (x-graphics-draw-string window x y string)
   ;; Draw characters in the current font at the given coordinates, with