--- deliantra/server/common/holy.C	2009/11/06 12:27:05	1.19
+++ deliantra/server/common/holy.C	2009/11/29 10:55:18	1.23
@@ -31,7 +31,7 @@
 #include <spells.h>
 
 /* add_god_to_list()- called only from init_gods */
-void
+static void
 add_god_to_list (archetype *god_arch)
 {
   if (!god_arch)
@@ -67,39 +67,8 @@
 #endif
 }
 
-/* baptize_altar() - (cosmetically) change the name to that of the
- * god in question, then set the title for later use. -b.t.
- */
-int
-baptize_altar (object *op)
-{
-  char buf[MAX_BUF];
-
-  /* if the title field is pre-set, then that altar is
-   * already dedicated. */
-  if (!op->title)
-    {
-      godlink *god = get_rand_god ();
-
-      if (!god || !god->name)
-        {
-          LOG (llevError, "baptise_altar(): bizarre nameless god!\n");
-          return 0;
-        }
-      /* if the object name hasnt' been changed, we tack on the gods name */
-      if (op->name == op->arch->object::name)
-        {
-          sprintf (buf, "%s of %s", &op->name, &god->name);
-          op->name = buf;
-        }
-      op->title = god->name;
-      return 1;
-    }
-  return 0;
-}
-
 godlink *
-get_rand_god (void)
+get_rand_god ()
 {
   godlink *god = first_god;
   int i;
@@ -127,23 +96,10 @@
     : 0;
 }
 
-void
-free_all_god (void)
-{
-  godlink *god, *godnext;
-
-  LOG (llevDebug, "Freeing god information\n");
-  for (god = first_god; god; god = godnext)
-    {
-      godnext = god->next;
-      delete god;
-    }
-}
-
 /* init_gods() - this takes a look at all of the archetypes to find
  * the objects which correspond to the GODS (type GOD) */
 void
-init_gods (void)
+init_gods ()
 {
   LOG (llevDebug, "Initialising gods...\n");