mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-03-14 19:01:45 -07:00
Code Issues Projects Releases Wiki Activity

Update allowable arguments for open-network-stream

Browse source 
* src/coding.c (Ffind_operation_coding_system): Allow t as a
target for open-network-stream.  (Bug #23540)
This commit is contained in:
Ken Brown 2016-05-24 11:05:09 -04:00
parent 8af79702fc
commit 4aa55338ff
1 changed files with 2 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

3
src/coding.c
View file

@ -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))