From afc0add11e47f0d7b4e4a1471dea4633ebfaf793 Mon Sep 17 00:00:00 2001
From: Bdale Garbee <bdale@gag.com>
Date: Fri, 4 Oct 2019 16:11:20 -0600
Subject: [PATCH] update bomAM to reflect changes in lepton-eda 1.9.8 and later

---
 scheme/gnet-bomAM.scm | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/scheme/gnet-bomAM.scm b/scheme/gnet-bomAM.scm
index 8411196..487a7a6 100644
--- a/scheme/gnet-bomAM.scm
+++ b/scheme/gnet-bomAM.scm
@@ -31,7 +31,9 @@
 
 (use-modules (ice-9 rdelim)
              (netlist backend-getopt)
+	     (netlist error)
              (netlist schematic)
+             (netlist schematic toplevel)
              (srfi srfi-26))
 
 (define bomAM:open-input-file
@@ -59,7 +61,7 @@ filename)
            (begin
              (bomAM:printlist (append attriblist (list "quantity" "refdes")) #\,)
              (newline)
-             (bomAM:printbom (bomAM:components (schematic-package-names toplevel-schematic)
+             (bomAM:printbom (bomAM:components (schematic-package-names (toplevel-schematic))
                                              attriblist)
                             0))))))
 
-- 
2.47.2