check for recursive requires + Lua update

sys/apis/injector.lua

@@ -96,7 +96,14 @@ return function(env)
 		end
 	end
 
+	local sentinel = { }
+
 	local function pathSearcher(modname)
+		if env.package.loaded[modname] == sentinel then
+			error("loop or previous error loading module '" .. modname .. "'", 0)
+		end
+		env.package.loaded[modname] = sentinel
+
 		local fname = modname:gsub('%.', '/')
 
 		for pattern in string.gmatch(env.package.path, "[^;]+") do

sys/apps/Lua.lua

@@ -45,8 +45,11 @@ local page = UI.Page {
 			[ 'control-space' ] = 'autocomplete',
 		},
 	},
+	tabs = UI.Tabs {
+		y = 3,
+		[1] = UI.Tab {
+			tabTitle = 'Formatted',
 			grid = UI.ScrollingGrid {
-		y = 3, ey = -2,
 				columns = {
 					{ heading = 'Key',   key = 'name'  },
 					{ heading = 'Value', key = 'value' },
@@ -54,19 +57,21 @@ local page = UI.Page {
 				sortColumn = 'name',
 				autospace = true,
 			},
-	titleBar = UI.TitleBar {
-		title = 'Output',
-		y = -1,
-		event = 'show_output',
-		closeInd = '^'
 		},
+		[2] = UI.Tab {
+			tabTitle = 'Output',
 			output = UI.Embedded {
-		y = -6,
 				visible = true,
-		backgroundColor = colors.gray,
+				maxScroll = 1000,
+				backgroundColor = colors.black,
+			},
+		},
 	},
 }
 
+page.grid = page.tabs[1].grid
+page.output = page.tabs[2].output
+
 function page:setPrompt(value, focus)
 	self.prompt:setValue(value)
 	self.prompt.scroll = 0
@@ -84,9 +89,8 @@ function page:setPrompt(value, focus)
 end
 
 function page:enable()
-	self:setFocus(self.prompt)
 	UI.Page.enable(self)
-	self.output:disable()
+	self:setFocus(self.prompt)
 end
 
 local function autocomplete(env, oLine, x)
@@ -145,18 +149,11 @@ function page:eventHandler(event)
 
 		self:draw()
 
+	elseif event.type == 'tab_select' then
+		self:setFocus(self.prompt)
+
 	elseif event.type == 'show_output' then
-		self.output:enable()
+		self.tabs:selectTab(self.tabs[2])
-
-		self.titleBar.oy = -7
-		self.titleBar.event = 'hide_output'
-		self.titleBar.closeInd = 'v'
-		self.titleBar:resize()
-
-		self.grid.ey = -8
-		self.grid:resize()
-
-		self:draw()
 
 	elseif event.type == 'autocomplete' then
 		local sz = #self.prompt.value
@@ -186,8 +183,6 @@ function page:eventHandler(event)
 		local s = tostring(self.prompt.value)
 
 		if #s > 0 then
-			history:add(s)
-			history:back()
 			self:executeStatement(s)
 		else
 			local t = { }
@@ -331,9 +326,18 @@ end
 function page:executeStatement(statement)
 	command = statement
 
+	history:add(statement)
+	history:back()
+
 	local s, m
 	local oterm = term.redirect(self.output.win)
 	self.output.win.scrollBottom()
+	local bg, fg = term.getBackgroundColor(), term.getTextColor()
+	term.setBackgroundColor(colors.black)
+	term.setTextColor(colors.yellow)
+	print('> ' .. tostring(statement))
+	term.setBackgroundColor(bg)
+	term.setTextColor(fg)
 	pcall(function()
 		s, m = self:rawExecute(command)
 	end)

sys/apps/system/requires.lua

@@ -13,7 +13,7 @@ local tab = UI.Tab {
 		accelerators = {
 			enter = 'update_path',
 		},
-    help = 'add a new path',
+    help = 'add a new path (reboot required)',
 	},
 	grid = UI.Grid {
 		y = 4, ey = -3,