water flow into pits (trunk only)

water should flow into chasms from Drum of Earthquake.
Exploding wands of digging had been handled in the trunk earlier.

src/music.c

@@ -221,6 +221,7 @@ int force;
 	struct obj *otmp;
 	struct trap *chasm;
 	int start_x, start_y, end_x, end_y;
+	schar filltype;
 
 	start_x = u.ux - (force * 2);
 	start_y = u.uy - (force * 2);
@@ -278,6 +279,16 @@ do_pit:		    chasm = maketrap(x,y,PIT);
 		    chasm->tseen = 1;
 
 		    levl[x][y].doormask = 0;
+		    /*
+		     * Let liquid flow into the newly created chasm.
+		     * Adjust corresponding code in apply.c for
+		     * exploding wand of digging if you alter this sequence.
+		     */
+		    filltype = fillholetyp(x,y);
+		    if (filltype != ROOM) {
+			levl[x][y].typ = filltype;
+			liquid_flow(x, y, filltype, chasm, (char *)0);
+		    }
 
 		    mtmp = m_at(x,y);