From f3e3b20c9bce4a635d3b7a99bc1f02e4310e516b Mon Sep 17 00:00:00 2001
From: Lorenz Lehmann <lorenz.lehmann@students.muho-mannheim.de>
Date: Mon, 12 Feb 2024 08:45:22 +0100
Subject: [PATCH] fix (sources): change operators

---
 OM-Lead.lisp |    4 ++--
 1 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/OM-Lead.lisp b/OM-Lead.lisp
index 19c9a77..dca737f 100644
--- a/OM-Lead.lisp
+++ b/OM-Lead.lisp
@@ -23,7 +23,7 @@
 
 (defvar *OMLead-files* nil)
 (setf *OMLead-files* '("gen-harmonies"
-                       "harmon-progress"
+                       "gen-sequence"
                        "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::gen-sequence omlead::get-score omlead::harmon-rhythm) Nil)))
 
 ;--------------------------------------------------
 ;filling packages

--
Gitblit v1.9.1