rubber hose attacks

Give similar feedback for attacking with a rubber hose as for bullwhip:
the wielder "lashes" rather than "swings".

src/mhitu.c

@@ -98,7 +98,8 @@ mswings_verb(
 {
     const char *verb;
     int otyp = mwep->otyp,
-        lash = (otyp == BULLWHIP),
+        /* (monsters don't actually wield towels, wet or otherwise) */
+        lash = (objects[otyp].oc_skill == P_WHIP || is_wet_towel(mwep)),
         /* some weapons can have more than one strike type; for those,
            give a mix of thrust and swing (caller doesn't care either way) */
         thrust = ((objects[otyp].oc_dir & PIERCE) != 0

src/uhitm.c

@@ -1374,7 +1374,7 @@ hmon_hitmon(
             You("%s %s%s",
                 (obj && (is_shield(obj)
                          || obj->otyp == HEAVY_IRON_BALL)) ? "bash"
-                : (obj && (obj->otyp == BULLWHIP
+                : (obj && (objects[obj->otyp].oc_skill == P_WHIP
                            || is_wet_towel(obj))) ? "lash"
                   : Role_if(PM_BARBARIAN) ? "smite"
                     : "hit",