--- deliantra/server/common/holy.C	2006/09/10 16:00:23	1.5
+++ deliantra/server/common/holy.C	2007/05/28 21:21:40	1.10
@@ -1,3 +1,26 @@
+/*
+ * This file is part of Crossfire TRT, the Multiplayer Online Role Playing Game.
+ * 
+ * Copyright (©) 2005,2006,2007 Marc Alexander Lehmann / Robin Redeker / the Crossfire TRT team
+ * Copyright (©) 2002,2007 Mark Wedel & Crossfire Development Team
+ * Copyright (©) 1992,2007 Frank Tore Johansen
+ * 
+ * Crossfire TRT is free software; you can redistribute it and/or modify it
+ * under the terms of the GNU General Public License as published by the Free
+ * Software Foundation; either version 2 of the License, or (at your option)
+ * any later version.
+ * 
+ * This program is distributed in the hope that it will be useful, but
+ * WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
+ * or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
+ * for more details.
+ * 
+ * You should have received a copy of the GNU General Public License along
+ * with Crossfire TRT; if not, write to the Free Software Foundation, Inc. 51
+ * Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
+ * 
+ * The authors can be reached via e-mail to <crossfire@schmorp.de>
+ */
 
 /* Started file Sept 1996 - initialization of gods in form of a
  * linked list -b.t.
@@ -28,10 +51,9 @@
 void
 init_gods (void)
 {
-  archetype *at = NULL;
+  LOG (llevDebug, "Initialising gods...\n");
 
-  LOG (llevDebug, "Initializing gods...");
-  for (at = first_archetype; at != NULL; at = at->next)
+  for (archetype *at = first_archetype; at; at = at->next)
     if (at->clone.type == GOD)
       add_god_to_list (at);
 
@@ -107,12 +129,13 @@
   int i;
 
   if (god)
-    for (i = RANDOM () % (god->id) + 1; god; god = god->next)
+    for (i = rndm (god->id) + 1; god; god = god->next)
       if (god->id == i)
         break;
 
   if (!god)
     LOG (llevError, "get_rand_god(): can't find a random god!\n");
+
   return god;
 }