Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emacs
emacs
Commits
887e0cba
Commit
887e0cba
authored
Feb 28, 1995
by
Karl Heuer
Browse files
(Fcall_interactively): Lock the display before executing the command, no
matter how we execute it.
parent
c759a121
Changes
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
9 additions
and
1 deletion
+9
-1
src/callint.c
src/callint.c
+9
-1
No files found.
src/callint.c
View file @
887e0cba
...
...
@@ -254,7 +254,12 @@ Otherwise, this is done only if an arg is read using the minibuffer.")
specs
=
Fcar
(
Fcdr
(
specs
));
}
else
if
(
EQ
(
funcar
,
Qmocklisp
))
return
ml_apply
(
fun
,
Qinteractive
);
{
#ifdef MULTI_PERDISPLAY
display_locked
=
1
;
#endif
return
ml_apply
(
fun
,
Qinteractive
);
}
else
goto
lose
;
...
...
@@ -306,6 +311,9 @@ Otherwise, this is done only if an arg is read using the minibuffer.")
Vcommand_history
=
Fcons
(
Fcons
(
function
,
values
),
Vcommand_history
);
}
#ifdef MULTI_PERDISPLAY
display_locked
=
1
;
#endif
return
apply1
(
function
,
specs
);
}
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment