X-Git-Url: https://git.gag.com/?a=blobdiff_plain;f=scheme%2Fgnet-partslistgag.scm;h=5fc16bbd140323ef009d8de41071d4e06ea62277;hb=cfcd84421c358ea244e90d4628632713b6f5817a;hp=1980c8a9a710d00eb2f424ed9dc659c535d647a8;hpb=4a4a608ab16bf2b1a481052834d927479da0bd61;p=hw%2Faltusmetrum diff --git a/scheme/gnet-partslistgag.scm b/scheme/gnet-partslistgag.scm index 1980c8a..5fc16bb 100644 --- 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)