Show examples folder when unitron is run from ram

elgopher · elgopher · commit e7cbdb5d47e6 · 2024-12-05T23:35:08.000+01:00
When unitron is run directly from /ram/cart, the examples folder is not
properly shown after user clicks "open examples" button.
diff --git a/gui/gui.lua b/gui/gui.lua
@@ -326,10 +326,16 @@ function _init()
 			y = 105
 		}
 		function examples_btn:click()
+			local dir = env().corun_program or env().prog_name
+			if dir == "/ram/cart/main.lua" then
+				dir = "/ram/cart"
+			end
+			dir = dir .. "/examples"
+
 			create_process(
 				"/system/apps/filenav.p64",
 				{
-					argv = { env().prog_name .. "/examples/" },
+					argv = { dir },
 				}
 			)
 		end

Original file line number	Diff line number	Diff line change
`@@ -326,10 +326,16 @@ function _init()`
`326`	`326`	`y = 105`
`327`	`327`	`}`
`328`	`328`	`function examples_btn:click()`
	`329`	`+ local dir = env().corun_program or env().prog_name`
	`330`	`+ if dir == "/ram/cart/main.lua" then`
	`331`	`+ dir = "/ram/cart"`
	`332`	`+ end`
	`333`	`+ dir = dir .. "/examples"`
	`334`	`+`
`329`	`335`	`create_process(`
`330`	`336`	`"/system/apps/filenav.p64",`
`331`	`337`	`{`
`332`		`- argv = { env().prog_name .. "/examples/" },`
	`338`	`+ argv = { dir },`
`333`	`339`	`}`
`334`	`340`	`)`
`335`	`341`	`end`