Mercurial > hg > xemacs-beta
comparison src/fileio.c @ 86:364816949b59 r20-0b93
Import from CVS: tag r20-0b93
author | cvs |
---|---|
date | Mon, 13 Aug 2007 09:09:02 +0200 |
parents | 6a378aca36af |
children | 4be1180a9e89 |
comparison
equal
deleted
inserted
replaced
85:c661705957e0 | 86:364816949b59 |
---|---|
3391 if (NILP (handler) && STRINGP (visit)) | 3391 if (NILP (handler) && STRINGP (visit)) |
3392 handler = Ffind_file_name_handler (visit, Qwrite_region); | 3392 handler = Ffind_file_name_handler (visit, Qwrite_region); |
3393 | 3393 |
3394 if (!NILP (handler)) | 3394 if (!NILP (handler)) |
3395 { | 3395 { |
3396 Lisp_Object val = call7 (handler, Qwrite_region, start, end, | 3396 Lisp_Object val = call8 (handler, Qwrite_region, start, end, |
3397 filename, append, visit, codesys); | 3397 filename, append, visit, lockname, codesys); |
3398 if (visiting) | 3398 if (visiting) |
3399 { | 3399 { |
3400 BUF_SAVE_MODIFF (current_buffer) = BUF_MODIFF (current_buffer); | 3400 BUF_SAVE_MODIFF (current_buffer) = BUF_MODIFF (current_buffer); |
3401 current_buffer->save_length = | 3401 current_buffer->save_length = |
3402 make_int (BUF_SIZE (current_buffer)); | 3402 make_int (BUF_SIZE (current_buffer)); |