diff options
| author | Ken Brown <kbrown@cornell.edu> | 2016-05-24 11:05:09 -0400 |
|---|---|---|
| committer | Ken Brown <kbrown@cornell.edu> | 2016-05-24 11:05:09 -0400 |
| commit | 4aa55338ff3af1cd4e87802e02156e636d212241 (patch) | |
| tree | 7d9545c4cf349b175eb40c3eccfaec91a2481b8a /src/coding.c | |
| parent | 8af79702fcdbee4e3151a48c1d194c8b014c3815 (diff) | |
| download | emacs-4aa55338ff3af1cd4e87802e02156e636d212241.tar.gz | |
Update allowable arguments for open-network-stream
* src/coding.c (Ffind_operation_coding_system): Allow t as a
target for open-network-stream. (Bug #23540)
Diffstat (limited to 'src/coding.c')
| -rw-r--r-- | src/coding.c | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/coding.c b/src/coding.c index 17cb77e28df..7d199567fd0 100644 --- a/src/coding.c +++ b/src/coding.c @@ -9843,7 +9843,8 @@ usage: (find-operation-coding-system OPERATION ARGUMENTS...) */) if (!(STRINGP (target) || (EQ (operation, Qinsert_file_contents) && CONSP (target) && STRINGP (XCAR (target)) && BUFFERP (XCDR (target))) - || (EQ (operation, Qopen_network_stream) && INTEGERP (target)))) + || (EQ (operation, Qopen_network_stream) + && (INTEGERP (target) || EQ (target, Qt))))) error ("Invalid argument %"pI"d of operation `%s'", XFASTINT (target_idx) + 1, SDATA (SYMBOL_NAME (operation))); if (CONSP (target)) |