Mercurial > emacs
comparison src/process.c @ 21798:98f624ae5507
(Fset_process_inherit_coding_system_flag): Fix test for non-nil FLAG.
| author | Andreas Schwab <schwab@suse.de> |
|---|---|
| date | Tue, 28 Apr 1998 09:27:02 +0000 |
| parents | bb39a5863a82 |
| children | 050ea21cec87 |
comparison
equal
deleted
inserted
replaced
| 21797:c9c52d84d14c | 21798:98f624ae5507 |
|---|---|
| 866 for the process which will run.") | 866 for the process which will run.") |
| 867 (process, flag) | 867 (process, flag) |
| 868 register Lisp_Object process, flag; | 868 register Lisp_Object process, flag; |
| 869 { | 869 { |
| 870 CHECK_PROCESS (process, 0); | 870 CHECK_PROCESS (process, 0); |
| 871 XPROCESS (process)->inherit_coding_system_flag = !Fnull (flag); | 871 XPROCESS (process)->inherit_coding_system_flag = !NILP (flag); |
| 872 return flag; | 872 return flag; |
| 873 } | 873 } |
| 874 | 874 |
| 875 DEFUN ("process-inherit-coding-system-flag", | 875 DEFUN ("process-inherit-coding-system-flag", |
| 876 Fprocess_inherit_coding_system_flag, Sprocess_inherit_coding_system_flag, | 876 Fprocess_inherit_coding_system_flag, Sprocess_inherit_coding_system_flag, |