Add 'mfg' field to partslist csv output

[hw/altusmetrum] / scheme / gnet-partslistgag.scm

diff --git a/scheme/gnet-partslistgag.scm b/scheme/gnet-partslistgag.scm
index 1980c8a9a710d00eb2f424ed9dc659c535d647a8..5fc16bbd140323ef009d8de41071d4e06ea62277 100644 (file)
--- a/scheme/gnet-partslistgag.scm
+++ b/scheme/gnet-partslistgag.scm
@@ -49,6 +49,7 @@
                        (gnetlist:get-package-attribute package "footprint")
                        (gnetlist:get-package-attribute package "loadstatus")
                        (gnetlist:get-package-attribute package "provided")
+                       (gnetlist:get-package-attribute package "mfg")
                        (gnetlist:get-package-attribute package "mfg_part_number")
                        (gnetlist:get-package-attribute package "vendor")
                        (gnetlist:get-package-attribute package "vendor_part_number")) ;; sdb change
@@ -102,7 +103,7 @@
 
 (define partslistgag:write-top-header
   (lambda (port)
-    (display "device,value,footprint,loadstatus,provided,mfg_part_number,vendor,vendor_part_number,quantity,refdes\n" port)))
+    (display "device,value,footprint,loadstatus,provided,mfg,mfg_part_number,vendor,vendor_part_number,quantity,refdes\n" port)))
 
 (define (partslistgag:write-partslist ls port)
   (if (null? ls)