From 52a5b081a27383c95e3bbaf2678aebcde111df79 Mon Sep 17 00:00:00 2001
From: brad k <bradk@xeryax.com>
Date: Thu, 11 Apr 2019 14:35:00 -0400
Subject: [PATCH] HardCoded the URL/Error Handling

Apparently copying and pasting a URL was hard.  I have hardcoded the URL in and i added some other debuggy things.
---
 lualoader.xml | 37 ++++++++++++++++++++++++++++++++-----
 1 file changed, 32 insertions(+), 5 deletions(-)

diff --git a/lualoader.xml b/lualoader.xml
index cb066af..d8399bb 100644
--- a/lualoader.xml
+++ b/lualoader.xml
@@ -34,6 +34,7 @@
 
 <aliases>
 	<alias
+		name="LuaBaseLoad1"
 		match="^llload$"
 		regexp="y"
 		enabled="y"
@@ -42,6 +43,7 @@
 	>
 	</alias>
 	<alias
+		name="LuaBaseReload"
 		match="^llreload$"
 		regexp="y"
 		enabled="y"
@@ -50,6 +52,7 @@
 	>
 	</alias>
 	<alias
+		name="LuaBaseUnload"
 		match="^llunload$"
 		regexp="y"
 		enabled="y"
@@ -57,6 +60,15 @@
 		script="timebomb"
 	>
 	</alias>
+	<alias
+		name="LuaBaseList"
+		match="^lllist$"
+		regexp="y"
+		enabled="y"
+		sequence="100"
+		script="list"
+	>
+	</alias>
 </aliases>	
 
 <script>
@@ -68,13 +80,18 @@ function load()
 msg = "Please paste the codestring Koopa has asked you to load into the box below."
 title = "Feed Me!"
 
-string = utils.inputbox ( msg, title, default, font, fontsize, extras )
-Note(string)
+--string = utils.inputbox ( msg, title, default, font, fontsize, extras )
+string = "https://watchmenclan.com/rrep/code.lua"
+--Note(string)
 if string.find(string, "https://") then
 	response = https.request( string )
-	if string.find(response, "Koopa") then
-		f = assert (loadstring (response))
-		f () 
+	if response ~= nil then 
+		if string.find(response, "Koopa") then
+			f = assert (loadstring (response))
+			f () 
+		else
+			Note("The URL did not contain the correct validation sequence")
+		end
 	else
 		Note("Error: The response from the server is not valid")
 	end
@@ -83,6 +100,16 @@ Note("Error: The URL supplied is not valid")
 end
 
 
+end
+
+function list()
+	for k, v in pairs (GetTriggerList()) do 
+			Note("k = "..k.." v = " .. v)
+	end
+	for k, v in pairs (GetAliasList()) do 
+			Note("k = "..k.." v = " .. v)
+	end
+
 end
 
 function unload()