From 8e1e114af6e32c52d82a9f3979dd8fca6281ae3a Mon Sep 17 00:00:00 2001
From: Lorenz Lehmann <lorenz.lehmann@students.muho-mannheim.de>
Date: Sun, 10 Dec 2023 16:58:12 +0100
Subject: [PATCH] fix(sources): allot pitches to empty instruments
---
OM-Lead.lisp | 4 ++--
1 files changed, 2 insertions(+), 2 deletions(-)
diff --git a/OM-Lead.lisp b/OM-Lead.lisp
index 1295c0e..c9aeb22 100644
--- a/OM-Lead.lisp
+++ b/OM-Lead.lisp
@@ -22,7 +22,7 @@
:name name))
(defvar *OMLead-files* nil)
-(setf *OMLead-files* '("harmon-database"
+(setf *OMLead-files* '("gen-harmonies"
"harmon-progress"
"get-score"
"harmon-rhythm"
@@ -42,7 +42,7 @@
;--------------------------------------------------
(defvar *svppackages-list* nil)
(setf *subpackages-list*
- '((Nil Nil Nil (omlead::harmon-database omlead::harmon-progress omlead::get-score omlead::harmon-rhythm) Nil)))
+ '((Nil Nil Nil (omlead::gen-harmonies omlead::harmon-progress omlead::get-score omlead::harmon-rhythm) Nil)))
;--------------------------------------------------
;filling packages
--
Gitblit v1.9.1