Spare simul_efun aktualisiert.

(und rekursives spare gefixt.)

Change-Id: I5029c7f4e065eae11091d40e43ce6976de8e6672
diff --git a/secure/simul_efun/spare/seteuid.c b/secure/simul_efun/spare/seteuid.c
new file mode 100644
index 0000000..516a759
--- /dev/null
+++ b/secure/simul_efun/spare/seteuid.c
@@ -0,0 +1,26 @@
+/* This sefun is to provide a replacement for the efun seteuid().
+ * Feel free to add it to your mudlibs, if you have much code relying on that.
+ */
+
+#if ! __EFUN_DEFINED__(seteuid)
+
+#include <configuration.h>
+
+int seteuid(string str)
+{
+    object ob = efun::previous_object();
+
+    if (!str)
+    {
+        efun::configure_object(ob, OC_EUID, 0);
+        return 1;
+    }
+
+    if (efun::call_direct(__MASTER_OBJECT__, "valid_seteuid", ob, str) != 1)
+        return 0;
+
+    efun::configure_object(ob, OC_EUID, str);
+    return 1;
+}
+
+#endif