From a6a1f10025611ec2d0e6eeb3c4e20ab0e73d1838 Mon Sep 17 00:00:00 2001
From: Sebastiaan Speck <12570668+sebastiaanspeck@users.noreply.github.com>
Date: Sun, 8 Dec 2024 18:49:03 +0100
Subject: [PATCH] Find test_suites outside :user package

---
 .../modules/munit_base/source/runner/test_suite_finder.magik | 5 ++---
 1 file changed, 2 insertions(+), 3 deletions(-)

diff --git a/munit/modules/munit_base/source/runner/test_suite_finder.magik b/munit/modules/munit_base/source/runner/test_suite_finder.magik
index 9c6b0705..72efa11d 100644
--- a/munit/modules/munit_base/source/runner/test_suite_finder.magik
+++ b/munit/modules/munit_base/source/runner/test_suite_finder.magik
@@ -72,6 +72,7 @@ _private _method test_suite_finder.find_all_suitable_suites()
 	>> .test_suites
 _endmethod
 $
+
 _pragma(classify_level=restricted,topic=MUnit)
 _method test_suite_finder.find_classes_for_module( module_name )
 	##
@@ -81,10 +82,8 @@ _method test_suite_finder.find_classes_for_module( module_name )
 	
 	result << rope.new()
 		
-	_for a_test_suite_owner_name _over .test_suites.keys()
+	_for a_test_suite_owner_name, a_class _over .test_suites.keys_and_elements()
 	_loop
-		a_class << _self.find_class(a_test_suite_owner_name)
-		
 		_if a_class _isnt _unset _andif
 		    a_class.module_name _is module_name
 		_then