diff --git a/src/xfns.c b/src/xfns.c
index 2b134716bd7..ad77ebc8f43 100644
--- a/src/xfns.c
+++ b/src/xfns.c
@@ -4514,8 +4514,8 @@ If omitted or nil, that stands for the selected frame's display.  */)
 		 VendorRelease (dpy));
 }
 
-DEFUN ("x-server-input-version", Fx_server_input_version,
-       Sx_server_input_version, 0, 1, 0,
+DEFUN ("x-server-input-extension-version", Fx_server_input_extension_version,
+       Sx_server_input_extension_version, 0, 1, 0,
        doc: /* Return the version of the X Input Extension supported by TERMINAL.
 The value is nil if TERMINAL's X server doesn't support the X Input
 Extension extension, or if Emacs doesn't support the version present
@@ -8222,7 +8222,7 @@ eliminated in future versions of Emacs.  */);
   defsubr (&Sx_server_max_request_size);
   defsubr (&Sx_server_vendor);
   defsubr (&Sx_server_version);
-  defsubr (&Sx_server_input_version);
+  defsubr (&Sx_server_input_extension_version);
   defsubr (&Sx_display_pixel_width);
   defsubr (&Sx_display_pixel_height);
   defsubr (&Sx_display_mm_width);