diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/eval.c | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/src/eval.c b/src/eval.c index 42dcc814bb6..e000ea622c5 100644 --- a/src/eval.c +++ b/src/eval.c | |||
| @@ -255,7 +255,11 @@ call_debugger (arg) | |||
| 255 | specbind (intern ("debugger-may-continue"), | 255 | specbind (intern ("debugger-may-continue"), |
| 256 | debug_while_redisplaying ? Qnil : Qt); | 256 | debug_while_redisplaying ? Qnil : Qt); |
| 257 | specbind (Qinhibit_redisplay, Qnil); | 257 | specbind (Qinhibit_redisplay, Qnil); |
| 258 | |||
| 259 | #if 0 /* Binding this prevents execution of Lisp code during | ||
| 260 | redisplay, which necessarily leads to display problems. */ | ||
| 258 | specbind (Qinhibit_eval_during_redisplay, Qt); | 261 | specbind (Qinhibit_eval_during_redisplay, Qt); |
| 262 | #endif | ||
| 259 | 263 | ||
| 260 | val = apply1 (Vdebugger, arg); | 264 | val = apply1 (Vdebugger, arg); |
| 261 | 265 | ||