/[emacs]/emacs/src/coding.c
ViewVC logotype

Diff of /emacs/src/coding.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.252 by handa, Fri Jul 26 11:53:25 2002 UTC revision 1.253 by handa, Thu Aug 8 12:34:27 2002 UTC
# Line 6878  usage: (find-operation-coding-system OPE Line 6878  usage: (find-operation-coding-system OPE
6878    if (nargs < 1 + XINT (target_idx))    if (nargs < 1 + XINT (target_idx))
6879      error ("Too few arguments for operation: %s",      error ("Too few arguments for operation: %s",
6880             SDATA (SYMBOL_NAME (operation)));             SDATA (SYMBOL_NAME (operation)));
6881      /* For write-region, if the 6th argument (i.e. VISIT, the 5th
6882         argument to write-region) is string, it must be treated as a
6883         target file name.  */
6884      if (EQ (operation, Qwrite_region)
6885          && nargs > 5
6886          && STRINGP (args[5]))
6887        target_idx = 4;
6888    target = args[XINT (target_idx) + 1];    target = args[XINT (target_idx) + 1];
6889    if (!(STRINGP (target)    if (!(STRINGP (target)
6890          || (EQ (operation, Qopen_network_stream) && INTEGERP (target))))          || (EQ (operation, Qopen_network_stream) && INTEGERP (target))))

Legend:
Removed from v.1.252  
changed lines
  Added in v.1.253

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26