comparison src/doc.c @ 251:677f6a0ee643 r20-5b24

Import from CVS: tag r20-5b24
author cvs
date Mon, 13 Aug 2007 10:19:59 +0200
parents 41f2f0e326e9
children 966663fcf606
comparison
equal deleted inserted replaced
250:f385a461c9aa 251:677f6a0ee643
213 } 213 }
214 else 214 else
215 name_reloc = file; 215 name_reloc = file;
216 216
217 fd = open (name_nonreloc ? name_nonreloc : 217 fd = open (name_nonreloc ? name_nonreloc :
218 (char *) XSTRING_DATA (name_reloc), O_RDONLY, 0); 218 (char *) XSTRING_DATA (name_reloc), O_RDONLY | OPEN_BINARY, 0);
219 if (fd < 0) 219 if (fd < 0)
220 { 220 {
221 #ifndef CANNOT_DUMP 221 #ifndef CANNOT_DUMP
222 if (purify_flag) 222 if (purify_flag)
223 { 223 {
226 /* Preparing to dump; DOC file is probably not installed. 226 /* Preparing to dump; DOC file is probably not installed.
227 So check in ../lib-src. */ 227 So check in ../lib-src. */
228 strcpy (name_nonreloc, "../lib-src/"); 228 strcpy (name_nonreloc, "../lib-src/");
229 strcat (name_nonreloc, (char *) XSTRING_DATA (file)); 229 strcat (name_nonreloc, (char *) XSTRING_DATA (file));
230 230
231 fd = open (name_nonreloc, O_RDONLY, 0); 231 fd = open (name_nonreloc, O_RDONLY | OPEN_BINARY, 0);
232 } 232 }
233 #endif /* CANNOT_DUMP */ 233 #endif /* CANNOT_DUMP */
234 234
235 if (fd < 0) 235 if (fd < 0)
236 error ("Cannot open doc string file \"%s\"", 236 error ("Cannot open doc string file \"%s\"",
444 strcpy (name, "../lib-src/"); 444 strcpy (name, "../lib-src/");
445 } 445 }
446 446
447 strcat (name, (char *) XSTRING_DATA (filename)); 447 strcat (name, (char *) XSTRING_DATA (filename));
448 448
449 fd = open (name, O_RDONLY, 0); 449 fd = open (name, O_RDONLY | OPEN_BINARY, 0);
450 if (fd < 0) 450 if (fd < 0)
451 report_file_error ("Opening doc string file", 451 report_file_error ("Opening doc string file",
452 Fcons (build_string (name), Qnil)); 452 Fcons (build_string (name), Qnil));
453 Vdoc_file_name = filename; 453 Vdoc_file_name = filename;
454 filled = 0; 454 filled = 0;