diff --git a/src/keyboard.c b/src/keyboard.c
index d7e5d1752aa..404bbb30d02 100644
--- a/src/keyboard.c
+++ b/src/keyboard.c
@@ -3782,7 +3782,7 @@ On such systems, Emacs starts a subshell instead of suspending.")
   (stuffstring)
      Lisp_Object stuffstring;
 {
-  register Lisp_Object tem;
+  Lisp_Object tem;
   int count = specpdl_ptr - specpdl;
   int old_height, old_width;
   int width, height;