diff --exclude 'debian/*' --exclude 'Makefile*' -ur orig/nethack-3.4.3/dat/data.base nethack-3.4.3/dat/data.base
--- orig/nethack-3.4.3/dat/data.base	2003-12-24 21:41:49.000000000 -0800
+++ nethack-3.4.3/dat/data.base	2004-01-21 20:15:09.000000000 -0800
@@ -1145,6 +1145,15 @@
 erinyes
 	These female-seeming devils named after the Furies of mythology
 	attack hand to hand and poison their unwary victims as well.
+
+	The lights in the room seemed to dim as the ancient Greek words
+	rolled off Cassandra's tongue. "They are Megaera, the Rager;
+	Alecto, the Endless; and Tisiphone, the Retaliator." Each name
+	resonated through the chamber like the beat of a giant drum.
+	"Ugly beyond measure, with living snakes for hair, they dispense
+	final justice for the betrayers of parents or kin. They are the
+	Furies."
+		[ A Calculated Magic, by Robert Weinberg ]
 ettin
 	The two-headed giant, or ettin, is a vicious and unpredictable
 	hunter that stalks by night and eats any meat it can catch.
Only in nethack-3.4.3/: debian
Only in nethack-3.4.3/src: .do_name.c.swp
diff --exclude 'debian/*' --exclude 'Makefile*' -ur orig/nethack-3.4.3/src/makemon.c nethack-3.4.3/src/makemon.c
--- orig/nethack-3.4.3/src/makemon.c	2003-12-24 21:41:52.000000000 -0800
+++ nethack-3.4.3/src/makemon.c	2004-01-21 20:08:55.000000000 -0800
@@ -994,6 +994,30 @@
 			if (Inhell && is_bat(ptr))
 			    mon_adjust_speed(mtmp, 2, (struct obj *)0);
 			break;
+
+		case S_DEMON:
+			if (mndx == PM_ERINYS)
+			{
+			  static int used[3] = { 0, 0, 0 };
+			  /* 0 - Alecto, 1 - Megaera, 2 - Tisiphone */
+		          int which;
+			  char* mname;
+
+			  if (used[0] && used[1] && used[2]) break;
+			  while (used[which = rn2(3)] == 1);
+			  used[which] = 1;
+
+			  switch(which)
+			  {
+			    case 0: mname = "Alecto"; break;
+			    case 1: mname = "Megaera"; break;
+			    case 2: mname = "Tisiphone"; break;
+			    default: impossible("could not choose a Fury name");
+			  }
+			  
+			  mtmp = christen_monst(mtmp, mname);
+			  break;
+			}
 	}
 	if ((ct = emits_light(mtmp->data)) > 0)
 		new_light_source(mtmp->mx, mtmp->my, ct,
