Cha-cha-cha-changes

Changed the shuttle controller to a datum, changed the appearance of the
labor shuttle, and fixed stackers giving one free stack of each ore.

code/modules/mining/laborcamp/laborshuttle.dm

@@ -15,7 +15,7 @@
 
 /obj/machinery/computer/shuttle/labor/one_way/Topic(href, href_list)
 	if(href_list["move"])
-		var/obj/shuttle_manager/s = shuttles["laborcamp"]
+		var/datum/shuttle_manager/s = shuttles["laborcamp"]
 		if(s.location == /area/shuttle/laborcamp/outpost)
 			usr << "\blue Shuttle is already at the outpost."
 			return 0

code/modules/mining/laborcamp/laborstacker.dm

@@ -92,7 +92,7 @@
 			else usr << "\red No valid ID."
 		if(check_auth()) //Sanity check against hef spoofs
 			if(href_list["choice"] == "station")
-				var/obj/shuttle_manager/s = shuttles["laborcamp"]
+				var/datum/shuttle_manager/s = shuttles["laborcamp"]
 				if(s.location == /area/shuttle/laborcamp/outpost)
 					if (s.move_shuttle())
 						usr << "\blue Shuttle recieved message and will be sent shortly."

code/modules/mining/machine_stacking.dm

@@ -91,7 +91,9 @@
 	if(!istype(inp)) //Non-sheets. Yuck.
 		return
 	if(!(inp.type in stack_list)) //It's the first of this sheet added
-		stack_list[inp.type] = new inp.type(src,0)
+		var/obj/item/stack/sheet/s = new inp.type(src,0)
+		s.amount = 0
+		stack_list[inp.type] = s
 	var/obj/item/stack/sheet/storage = stack_list[inp.type]
 	storage.amount += inp.amount //Stack the sheets
 	inp.loc = null //Let the old sheet garbage collect