Merged from emacs@sv.gnu.org.
Patches applied: * emacs@sv.gnu.org/emacs--devo--0--patch-294 Update from CVS * emacs@sv.gnu.org/emacs--devo--0--patch-295 Merge from gnus--rel--5.10 * emacs@sv.gnu.org/emacs--devo--0--patch-296 Update from CVS: admin/FOR-RELEASE: Update refcard section. * emacs@sv.gnu.org/emacs--devo--0--patch-297 Update from CVS * emacs@sv.gnu.org/emacs--devo--0--patch-298 Update from CVS * emacs@sv.gnu.org/emacs--devo--0--patch-299 Update from CVS * emacs@sv.gnu.org/emacs--devo--0--patch-300 Update from CVS * emacs@sv.gnu.org/emacs--devo--0--patch-301 Update from CVS * emacs@sv.gnu.org/emacs--devo--0--patch-302 Update from CVS * emacs@sv.gnu.org/emacs--devo--0--patch-303 Update from CVS * emacs@sv.gnu.org/emacs--devo--0--patch-304 Update from CVS * emacs@sv.gnu.org/gnus--rel--5.10--patch-103 Update from CVS * emacs@sv.gnu.org/gnus--rel--5.10--patch-104 Update from CVS git-archimport-id: lorentey@elte.hu--2004/emacs--multi-tty--0--patch-570
This commit is contained in:
commit
476e9367ec
241 changed files with 26851 additions and 25078 deletions
15
src/coding.c
15
src/coding.c
|
@ -7465,7 +7465,7 @@ is selected as the TARGET. For example, if OPERATION does file I/O,
|
|||
whichever argument specifies the file name is TARGET.
|
||||
|
||||
TARGET has a meaning which depends on OPERATION:
|
||||
For file I/O, TARGET is a file name.
|
||||
For file I/O, TARGET is a file name (except for the special case below).
|
||||
For process I/O, TARGET is a process name.
|
||||
For network I/O, TARGET is a service name or a port number
|
||||
|
||||
|
@ -7477,6 +7477,13 @@ or a function symbol to call.
|
|||
In the last case, we call the function with one argument,
|
||||
which is a list of all the arguments given to this function.
|
||||
|
||||
If OPERATION is `insert-file-contents', the argument corresponding to
|
||||
TARGET may be a cons (FILENAME . BUFFER). In that case, FILENAME is a
|
||||
file name to look up, and BUFFER is a buffer that contains the file's
|
||||
contents (not yet decoded). If `file-coding-system-alist' specifies a
|
||||
function to call for FILENAME, that function should examine the
|
||||
contents of BUFFER instead of reading the file.
|
||||
|
||||
usage: (find-operation-coding-system OPERATION ARGUMENTS ...) */)
|
||||
(nargs, args)
|
||||
int nargs;
|
||||
|
@ -7503,8 +7510,12 @@ usage: (find-operation-coding-system OPERATION ARGUMENTS ...) */)
|
|||
target_idx = make_number (4);
|
||||
target = args[XINT (target_idx) + 1];
|
||||
if (!(STRINGP (target)
|
||||
|| (EQ (operation, Qinsert_file_contents) && CONSP (target)
|
||||
&& STRINGP (XCAR (target)) && BUFFERP (XCDR (target)))
|
||||
|| (EQ (operation, Qopen_network_stream) && INTEGERP (target))))
|
||||
error ("Invalid argument %d", XINT (target_idx) + 1);
|
||||
if (CONSP (target))
|
||||
target = XCAR (target);
|
||||
|
||||
chain = ((EQ (operation, Qinsert_file_contents)
|
||||
|| EQ (operation, Qwrite_region))
|
||||
|
@ -7537,7 +7548,7 @@ usage: (find-operation-coding-system OPERATION ARGUMENTS ...) */)
|
|||
return Fcons (val, val);
|
||||
if (! NILP (Ffboundp (val)))
|
||||
{
|
||||
val = call1 (val, Flist (nargs, args));
|
||||
val = safe_call1 (val, Flist (nargs, args));
|
||||
if (CONSP (val))
|
||||
return val;
|
||||
if (SYMBOLP (val) && ! NILP (Fcoding_system_p (val)))
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue