comparison src/glyphs.c @ 223:2c611d1463a6 r20-4b10

Import from CVS: tag r20-4b10
author cvs
date Mon, 13 Aug 2007 10:10:54 +0200
parents 3d6bfa290dbd
children 83b3d10dcba9
comparison
equal deleted inserted replaced
222:aae4c8b01452 223:2c611d1463a6
398 specbind (Qinhibit_quit, Qt); 398 specbind (Qinhibit_quit, Qt);
399 record_unwind_protect (Fset_buffer, Fcurrent_buffer ()); 399 record_unwind_protect (Fset_buffer, Fcurrent_buffer ());
400 temp_buffer = Fget_buffer_create (build_string (" *pixmap conversion*")); 400 temp_buffer = Fget_buffer_create (build_string (" *pixmap conversion*"));
401 GCPRO1 (temp_buffer); 401 GCPRO1 (temp_buffer);
402 set_buffer_internal (XBUFFER (temp_buffer)); 402 set_buffer_internal (XBUFFER (temp_buffer));
403 Ferase_buffer (Fcurrent_buffer ()); 403 Ferase_buffer (Qnil);
404 specbind (intern ("format-alist"), Qnil); 404 specbind (intern ("format-alist"), Qnil);
405 Finsert_file_contents_internal (file, Qnil, Qnil, Qnil, Qnil, Qnil, Qnil); 405 Finsert_file_contents_internal (file, Qnil, Qnil, Qnil, Qnil, Qnil, Qnil);
406 data = Fbuffer_substring (Qnil, Qnil, Fcurrent_buffer ()); 406 data = Fbuffer_substring (Qnil, Qnil, Qnil);
407 unbind_to (count, Qnil); 407 unbind_to (count, Qnil);
408 UNGCPRO; 408 UNGCPRO;
409 return data; 409 return data;
410 } 410 }
411 411