Security fixes

[sxemacs] / src / events / events.c

diff --git a/src/events/events.c b/src/events/events.c
index c7b3a72..04aa180 100644 (file)
--- a/src/events/events.c
+++ b/src/events/events.c
@@ -262,9 +262,8 @@ print_event(Lisp_Object obj, Lisp_Object printcharfun, int escapeflag)
                assert(INTP(Vx));
                Vy = Fevent_y_pixel(obj);
                assert(INTP(Vy));
-               sprintf(buf, "#<motion-event %ld, %ld", (long)XINT(Vx),
-                       (long)XINT(Vy));
-               write_c_string(buf, printcharfun);
+               write_fmt_str(printcharfun, "#<motion-event %ld, %ld", (long)XINT(Vx),
+                             (long)XINT(Vy));
                break;
        }
        case process_event: