gEDA-cvs: CVS update: o_arc_basic.nw

[cvspsrv@xxxxxxxx]

  User: mike    
  Date: 06/07/03 13:24:24

  Modified:    .        o_arc_basic.nw o_circle_basic.nw s_cue.nw
  Log:
  Removing of references to `mils' function in PS output.
  
  
  
  
  Revision  Changes    Path
  1.17      +6 -2      eda/geda/devel/libgeda/noweb/o_arc_basic.nw
  
  (In the diff below, changes in quantity of whitespace are not shown.)
  
  Index: o_arc_basic.nw
  ===================================================================
  RCS file: /home/cvspsrv/cvsroot/eda/geda/devel/libgeda/noweb/o_arc_basic.nw,v
  retrieving revision 1.16
  retrieving revision 1.17
  diff -u -b -r1.16 -r1.17
  --- o_arc_basic.nw	18 May 2006 02:13:06 -0000	1.16
  +++ o_arc_basic.nw	3 Jul 2006 17:24:24 -0000	1.17
  @@ -1456,6 +1456,7 @@
   
   <<o_arc_print_phantom() : printing a dot>>=
     /* PB : problem corrected : diameter of printed dots */
  +/*
     fprintf(fp, "newpath\n");
     fprintf(fp, "%d mils %d mils\n", (int) xa, (int) ya);
     if (arc_width <= 1) {
  @@ -1465,6 +1466,7 @@
     }
     fprintf(fp, "0 360 arc\n");
     fprintf(fp, "fill\n");
  +*/
     /* PB : end */
   
   @ 
  @@ -1492,6 +1494,8 @@
       return;
     }
   
  +
  +
     fprintf(fp, "gsave\n");
     if (w_current->print_color) {
       f_print_set_color(fp, o_current->color);
  @@ -1537,8 +1541,8 @@
   		
   
     fprintf(fp, "newpath\n");
  -  fprintf(fp, "%d mils %d mils\n", x-origin_x, y-origin_y);
  -  fprintf(fp, "%d mils\n", radius);
  +  fprintf(fp, "%d %d\n", x-origin_x, y-origin_y);
  +  fprintf(fp, "%d\n", radius);
     fprintf(fp, "%d %d arc\n", start_angle, end_angle);
     fprintf(fp, "stroke\n");
     fprintf(fp, "grestore\n");
  
  
  
  1.14      +8 -13     eda/geda/devel/libgeda/noweb/o_circle_basic.nw
  
  (In the diff below, changes in quantity of whitespace are not shown.)
  
  Index: o_circle_basic.nw
  ===================================================================
  RCS file: /home/cvspsrv/cvsroot/eda/geda/devel/libgeda/noweb/o_circle_basic.nw,v
  retrieving revision 1.13
  retrieving revision 1.14
  diff -u -b -r1.13 -r1.14
  --- o_circle_basic.nw	18 May 2006 02:13:06 -0000	1.13
  +++ o_circle_basic.nw	3 Jul 2006 17:24:24 -0000	1.14
  @@ -1429,20 +1429,15 @@
       return;
     }
   
  -  fprintf(fp, "gsave\n");
  -  if (w_current->print_color) {
  -    f_print_set_color(fp, o_current->color);
  -  }
  -
  -  f_print_set_line_width(fp, o_current->line_width);
  +  o_arc_print_solid(w_current, fp,
  +                    o_current->circle->center_x, 
  +		    o_current->circle->center_y,
  +		    o_current->circle->radius,
  +                    0, FULL_CIRCLE / 64,
  +                    o_current->color),
  +                    o_current->line_width, -1, -1,
  +                    origin_x, origin_y);
   
  -  fprintf(fp, "newpath\n");
  -  fprintf(fp, "%d mils %d mils\n", o_current->circle->center_x-origin_x, 
  -          o_current->circle->center_y-origin_y);
  -  fprintf(fp, "%d mils\n", o_current->circle->radius);
  -  fprintf(fp, "0 360 arc\n");
  -  fprintf(fp, "stroke\n");
  -  fprintf(fp, "grestore\n");
   }
   
   @ %def o_circle_print_old
  
  
  
  1.11      +2 -2      eda/geda/devel/libgeda/noweb/s_cue.nw
  
  (In the diff below, changes in quantity of whitespace are not shown.)
  
  Index: s_cue.nw
  ===================================================================
  RCS file: /home/cvspsrv/cvsroot/eda/geda/devel/libgeda/noweb/s_cue.nw,v
  retrieving revision 1.10
  retrieving revision 1.11
  diff -u -b -r1.10 -r1.11
  --- s_cue.nw	18 May 2006 02:13:06 -0000	1.10
  +++ s_cue.nw	3 Jul 2006 17:24:24 -0000	1.11
  @@ -134,8 +134,8 @@
     }
   
     fprintf(fp, "newpath\n");
  -  fprintf(fp, "%d mils %d mils\n", x, y);
  -  fprintf(fp, "%d mils\n", offset2 / 2);
  +  fprintf(fp, "%d %d\n", x, y);
  +  fprintf(fp, "%d\n", offset2 / 2);
     fprintf(fp, "0 360 arc\n");
     fprintf(fp, "fill\n");
   }
  
  
  
_______________________________________________
geda-cvs mailing list
geda-cvs@xxxxxxxxxxxxxx
http://www.seul.org/cgi-bin/mailman/listinfo/geda-cvs