(cmd_error): Allow current_perdisplay to be null.

1 files changed, 7 insertions, 3 deletions

diff --git a/src/keyboard.c b/src/keyboard.c
index 78f42ce5c7b..8212d2aedc0 100644
--- a/src/keyboard.c
+++ b/src/keyboard.c
@@ -768,15 +768,19 @@ cmd_error (data)
   Vstandard_output = Qt;
   Vstandard_input = Qt;
   Vexecuting_macro = Qnil;
-  clear_prefix_arg ();
-  cancel_echoing ();
+  if (current_perdisplay)
+    {
+      clear_prefix_arg ();
+      cancel_echoing ();
+    }
   cmd_error_internal (data, 0);
 
   Vquit_flag = Qnil;
 
   Vinhibit_quit = Qnil;
 #ifdef MULTI_PERDISPLAY
-  unlock_display ();
+  if (current_perdisplay)
+    unlock_display ();
 #endif
 
   return make_number (0);