Index: server/ruleset.c
===================================================================
RCS file: /home/freeciv/CVS/freeciv/server/ruleset.c,v
retrieving revision 1.54
diff -u -r1.54 ruleset.c
--- ruleset.c	2000/05/09 17:13:59	1.54
+++ ruleset.c	2000/05/13 15:36:14
@@ -655,7 +655,7 @@
 	freelog(LOG_NORMAL, "for unit_type \"%s\": bad role name \"%s\" (%s)",
 	     u->name, sval, filename);
       }
-      u->roles |= (1<<ival);
+      u->roles |= (1<<(ival-L_FIRST));
     }
     free(slist);
   }