new and fixed messages

2 fixed messages and 2 new silly messages

src/apply.c

@@ -689,7 +689,7 @@ register xchar x, y;
 			/* life-saving doesn't ordinarily reset this */
 			if (mtmp->mhp > 0) u.uconduct.killer = save_pacifism;
 		    } else {
-			pline("%s chokes on the leash!", Monnam(mtmp));
+			pline("%s is choked by the leash!", Monnam(mtmp));
 			/* tameness eventually drops to 1 here (never 0) */
 			if (mtmp->mtame && rn2(mtmp->mtame)) mtmp->mtame--;
 		    }

src/artifact.c

@@ -1201,6 +1201,8 @@ int dieroll; /* needed for Magicbane and vorpal blades */
 			*dmgptr = 2 * mdef->mhp + FATAL_DAMAGE_MODIFIER;
 			pline(behead_msg[rn2(SIZE(behead_msg))],
 			      wepdesc, mon_nam(mdef));
+			if(Hallucination && !flags.female)
+				pline("Good job Henry, but that wasn't Anne.");
 			otmp->dknown = TRUE;
 			return TRUE;
 		} else {

src/potion.c

@@ -415,7 +415,7 @@ dodrink()
 	/* Or are you surrounded by water? */
 	if (Underwater && !u.uswallow) {
 		if (yn("Drink the water around you?") == 'y') {
-		    pline("Do you know what lives in this water!");
+		    pline("Do you know what lives in this water?");
 			return 1;
 		}
 	}

src/sit.c

@@ -292,8 +292,11 @@ dosit()
 		struct obj *uegg;
 
 		if (!flags.female) {
+		    if(Hallucination)
+pline("You may think you are a platypus but a male still can't lay eggs!");
+		    else
 			pline("Males can't lay eggs!");
-			return 0;
+		    return 0;
 		}
 
 		if (u.uhunger < (int)objects[EGG].oc_nutrition) {