Infrastructure: Remove dependency on defunct lite package

Author: ERSUCC

src/main/InterfaceComponent.scala

@@ -14,7 +14,6 @@ import org.nlogo.awt.EventQueue
 import org.nlogo.compile.Compiler
 import org.nlogo.core.{ AgentKind, Model }
 import org.nlogo.gl.view.ViewManager
-import org.nlogo.lite.ProceduresLite
 import org.nlogo.sdm.AggregateManagerLite
 import org.nlogo.theme.InterfaceColors
 import org.nlogo.window.Events.{ CompiledEvent, LoadModelEvent }
@@ -66,7 +65,7 @@ with ControlSet {
   workspace.init(viewManager)
   addLinkComponent(viewManager)
 
-  val procedures = new ProceduresLite(workspace, workspace)
+  val procedures = new Procedures(workspace)
   val liteEditorFactory = new DefaultEditorFactory(workspace)
   val interfacePanel: InterfacePanelLite = createInterfacePanel(workspace)
 

src/main/Procedures.scala

@@ -0,0 +1,39 @@
+package org.nlogo.ls.gui
+
+import org.nlogo.core.AgentKind
+import org.nlogo.window.{ Event, Events, ProceduresInterface }
+
+// dummy class so LevelSpace doesn't need to depend on (and instantiate) the main CodeTab class (Isaac B 1/25/26)
+class Procedures(linkParent: AnyRef)
+  extends ProceduresInterface with Event.LinkChild with Events.LoadModelEvent.Handler {
+
+  private var text = ""
+
+  override def classDisplayName: String =
+    "Code"
+
+  override def kind: AgentKind =
+    AgentKind.Observer
+
+  override def headerSource: String =
+    ""
+
+  override def innerSource: String =
+    text
+
+  override def source: String =
+    headerSource + innerSource
+
+  override def innerSource_=(text: String): Unit = {
+    this.text = text
+  }
+
+  override def handle(e: Events.LoadModelEvent): Unit = {
+    innerSource = e.model.code
+
+    new Events.CompileAllEvent().raise(this)
+  }
+
+  override def getLinkParent: AnyRef =
+    linkParent
+}