[mgp-users-jp 00489] Re: mgp2ps

[Yoshifumi Nishida <nishida@sfc.wide.ad.jp>]

>>>>> On Tue, 25 May 1999 18:05:32 +0900, Yoshifumi Nishida <nishida@sfc.wide.ad.jp> said:
 >> うーん。ごめんなさい。。
 >> 以下のパッチを試していただけますか？

ああ、まだ虫がいた。。すみません。こちらのパッチを試していただけますか？
--
西田佳史
nishida@sfc.wide.ad.jp


*** print.c.orig	Tue May 25 18:07:48 1999
--- print.c	Tue May 25 18:41:50 1999
***************
*** 429,435 ****
  		"/WIDTH %d def /HEIGHT %d def\n",
  		paper_xmargin, paper_ymargin, window_width, window_height);
  	fprintf(fp, "/XBODY WIDTH XMARGIN 2 mul sub def\n");
! 	fprintf(fp, "/vertgap %d def /horizgap %d def\n", vert_gap, horiz_gap);
  
  	/* define writebox */
  	fprintf(fp, "/writebox {\n");
--- 429,435 ----
  		"/WIDTH %d def /HEIGHT %d def\n",
  		paper_xmargin, paper_ymargin, window_width, window_height);
  	fprintf(fp, "/XBODY WIDTH XMARGIN 2 mul sub def\n");
! 	fprintf(fp, "/vertgap %d def /horizgap %d def\n", vert_gap[0], horiz_gap[0]);
  
  	/* define writebox */
  	fprintf(fp, "/writebox {\n");
***************
*** 572,578 ****
  	switch(cp->ct_op) {
  	case CTL_SIZE:
  		char_size[0] = window_height * cp->ctf_value / 100;
! 		fprintf(fp, "%d setcharsize\n", char_size);
  		break;
  
  #ifdef VFLIB
--- 572,578 ----
  	switch(cp->ct_op) {
  	case CTL_SIZE:
  		char_size[0] = window_height * cp->ctf_value / 100;
! 		fprintf(fp, "%d setcharsize\n", char_size[0]);
  		break;
  
  #ifdef VFLIB