diff options
| author | Kenichi Handa | 2006-05-29 00:57:27 +0000 |
|---|---|---|
| committer | Kenichi Handa | 2006-05-29 00:57:27 +0000 |
| commit | 7311509ee6842235502d446a4aaf16d3f0a6e068 (patch) | |
| tree | fc01faaa218452b8ceb6cb84fce5637726208511 /src/coding.c | |
| parent | 0985f920394f5ee6a2fcf39ec1fbd53fbd3510bc (diff) | |
| download | emacs-7311509ee6842235502d446a4aaf16d3f0a6e068.tar.gz emacs-7311509ee6842235502d446a4aaf16d3f0a6e068.zip | |
(Ffind_operation_coding_system): Call a function by
safe_call1 instead of call1.
Diffstat (limited to 'src/coding.c')
| -rw-r--r-- | src/coding.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/coding.c b/src/coding.c index 5ef412a3619..03c07c3ba68 100644 --- a/src/coding.c +++ b/src/coding.c | |||
| @@ -7539,7 +7539,7 @@ usage: (find-operation-coding-system OPERATION ARGUMENTS ...) */) | |||
| 7539 | return Fcons (val, val); | 7539 | return Fcons (val, val); |
| 7540 | if (! NILP (Ffboundp (val))) | 7540 | if (! NILP (Ffboundp (val))) |
| 7541 | { | 7541 | { |
| 7542 | val = call1 (val, Flist (nargs, args)); | 7542 | val = safe_call1 (val, Flist (nargs, args)); |
| 7543 | if (CONSP (val)) | 7543 | if (CONSP (val)) |
| 7544 | return val; | 7544 | return val; |
| 7545 | if (SYMBOLP (val) && ! NILP (Fcoding_system_p (val))) | 7545 | if (SYMBOLP (val) && ! NILP (Fcoding_system_p (val))) |