gEDA-cvs: CVS update: gnet-bom.scm

[cvspsrv@xxxxxxxx]

  User: ahvezda 
  Date: 07/02/10 11:42:13

  Modified:    .        gnet-bom.scm gnet-bom2.scm
  Log:
  Applied patch to change "package" to "refdes" [ 1656822 ] BOM/BOM2
  
  should use refdes in title line
  
  
  
  
  Revision  Changes    Path
  1.12      +2 -2      eda/geda/gaf/gnetlist/scheme/gnet-bom.scm
  
  (In the diff below, changes in quantity of whitespace are not shown.)
  
  Index: gnet-bom.scm
  ===================================================================
  RCS file: /home/cvspsrv/cvsroot/eda/geda/gaf/gnetlist/scheme/gnet-bom.scm,v
  retrieving revision 1.11
  retrieving revision 1.12
  diff -u -b -r1.11 -r1.12
  --- gnet-bom.scm	22 Jan 2007 17:18:16 -0000	1.11
  +++ gnet-bom.scm	10 Feb 2007 16:42:13 -0000	1.12
  @@ -1,4 +1,4 @@
  -;;; $Id: gnet-bom.scm,v 1.11 2007/01/22 17:18:16 sdb Exp $
  +;;; $Id: gnet-bom.scm,v 1.12 2007/02/10 16:42:13 ahvezda Exp $
   ;;;
   ;;; gEDA - GNU Electronic Design Automation
   ;;; gnetlist - GNU Netlist
  @@ -39,7 +39,7 @@
   		      (current-output-port)
   		      (open-output-file output-filename)))
   	  (attriblist (bom:parseconfig (open-input-file "attribs"))))
  -      (bom:printlist (cons 'package attriblist) port)
  +      (bom:printlist (cons 'refdes attriblist) port)
         (bom:components port packages attriblist)
         (close-output-port port))))
   
  
  
  
  1.10      +2 -2      eda/geda/gaf/gnetlist/scheme/gnet-bom2.scm
  
  (In the diff below, changes in quantity of whitespace are not shown.)
  
  Index: gnet-bom2.scm
  ===================================================================
  RCS file: /home/cvspsrv/cvsroot/eda/geda/gaf/gnetlist/scheme/gnet-bom2.scm,v
  retrieving revision 1.9
  retrieving revision 1.10
  diff -u -b -r1.9 -r1.10
  --- gnet-bom2.scm	22 Jan 2007 17:18:16 -0000	1.9
  +++ gnet-bom2.scm	10 Feb 2007 16:42:13 -0000	1.10
  @@ -1,4 +1,4 @@
  -;;; $Id: gnet-bom2.scm,v 1.9 2007/01/22 17:18:16 sdb Exp $
  +;;; $Id: gnet-bom2.scm,v 1.10 2007/02/10 16:42:13 ahvezda Exp $
   ;;;
   ;;; gEDA - GNU Electronic Design Automation
   ;;; gnetlist - GNU Netlist
  @@ -39,7 +39,7 @@
   		      (current-output-port)
   		      (open-output-file output-filename)))
   	  (attriblist (bom2:parseconfig (open-input-file "attribs"))))
  -      (bom2:printlist (cons 'package attriblist) port #\:)
  +      (bom2:printlist (cons 'refdes attriblist) port #\:)
         (newline port)
         (bom2:printbom port (bom2:components packages attriblist))
         (close-output-port port))))
  
  
  


_______________________________________________
geda-cvs mailing list
geda-cvs@xxxxxxxxxxxxxx
http://www.seul.org/cgi-bin/mailman/listinfo/geda-cvs