Use #monster to make dragon steed breathe

doc/fixes3-7-0.txt

@@ -1247,6 +1247,7 @@ the throne room on the Samurai quest home level lacked a throne but gave
 	entered; vary the message rather than add a throne
 coughing due to stinking cloud wakes up nearby monsters
 stop occupation when timed levitation or choking issues a message
+use #monster to make dragon steed breathe
 
 
 Fixes to 3.7.0-x General Problems Exposed Via git Repository

include/extern.h

@@ -630,6 +630,7 @@ extern boolean cursed_object_at(coordxy, coordxy);
 extern struct obj *droppables(struct monst *);
 extern int dog_nutrition(struct monst *, struct obj *);
 extern int dog_eat(struct monst *, struct obj *, coordxy, coordxy, boolean);
+extern int pet_ranged_attk(struct monst *);
 extern int dog_move(struct monst *, int);
 extern boolean could_reach_item(struct monst *, coordxy, coordxy);
 extern void finish_meating(struct monst *);

src/cmd.c

@@ -960,6 +960,9 @@ domonability(void)
             aggravate();
     } else if (is_vampire(uptr) || is_vampshifter(&gy.youmonst)) {
         return dopoly();
+    } else if (u.usteed && can_breathe(u.usteed->data)) {
+        (void) pet_ranged_attk(u.usteed);
+        return ECMD_TIME;
     } else if (Upolyd) {
         pline("Any special ability you may have is purely reflexive.");
     } else {

src/dogmove.c

@@ -18,7 +18,6 @@ static int dog_goal(struct monst *, struct edog *, int, int, int);
 static struct monst *find_targ(struct monst *, int, int, int);
 static int find_friends(struct monst *, struct monst *, int);
 static struct monst *best_target(struct monst *);
-static int pet_ranged_attk(struct monst *);
 static long score_targ(struct monst *, struct monst *);
 static boolean can_reach_location(struct monst *, coordxy, coordxy, coordxy,
                                   coordxy);
@@ -866,7 +865,7 @@ best_target(struct monst *mtmp)   /* Pet */
 }
 
 /* Pet considers and maybe executes a ranged attack */
-static int
+int
 pet_ranged_attk(struct monst *mtmp)
 {
     struct monst *mtarg;