__shared_texout.c in tioga-1.19

- old
+ new

@@ -213,10 +213,11 @@
 
 void Open_tex(OBJ_PTR fmkr, char *filename, bool quiet_mode, int *ierr) 
 {
    char ofile[300];
    Get_tex_name(ofile, filename, 300);
+   FM *p = Get_FM(fmkr,ierr);
    fp = fopen(ofile, "w");
    fprintf(fp,"\\setlength{\\unitlength}{%fbp}%%\n", 1.0/ENLARGE);
    cur_pos = ftell(fp);
    fprintf(fp,"\\begin{picture}(xxxxxx,xxxxxx)            %% (width,height)(xoffset,yoffset) -- Adjust the 2nd pair for registration adjustments\n"); /* this line is rewritten at the end */
    fprintf(fp,"\\def\\BS{\\phantom{\\Huge\\scalebox{0}[2]{\\hbox{\\rotatebox{180}{O}O}}}}\n"); 
@@ -225,9 +226,10 @@
 }
 
 void Close_tex(OBJ_PTR fmkr, bool quiet_mode, int *ierr)
 {
    double x, y, xoff, yoff;
+   FM *p = Get_FM(fmkr,ierr);
    x = bbox_urx - bbox_llx; if (x < 0) x = bbox_urx = bbox_llx = 0;
    y = bbox_ury - bbox_lly; if (y < 0) y = bbox_ury = bbox_lly = 0;
    xoff = bbox_llx + Get_tex_xoffset(fmkr,ierr)*ENLARGE;
    yoff = bbox_lly + Get_tex_yoffset(fmkr,ierr)*ENLARGE;
    fprintf(fp,"\\end{picture}");