You can make a WeakAura which shows when you get a whisper and when you click on it, you cast the spell (Cover the entire screen with it and wherever you click, you cast it for example), but completely automated is not possible. (Unless you use 3rd party software)
Code:
function()
local r = WeakAuras.regions['Pet-BM-CallPet'].region /// The ".region" has to be the same name as the Aura itself
local b = CreateFrame("Button", "WA_CallPet_BM", r, "SecureActionButtonTemplate")
b:SetAllPoints()
b:SetAttribute("unit", "player")
b:SetAttribute("type", "spell")
b:SetAttribute("Spell", "Call Pet 1")
return true
end
This is a LUA code which - when you click on the aura - casts Call Pet 1. Just change:
b:SetAttribute("Spell", "Call Pet 1")
to
b:SetAttribute("Spell", "Aspect of the Fox")
This is the entire script for that WeakAura if you like to see how I did it btw.
Code:
dOeUiaqirc1IavFsKOgfjQtrsmlvq3IeAxIu9lrszysPogewMuXZibttKsxdsQTbj8nqbJtKI1bj5EIe5GsLwij1dvrMijs1fLsSrrs6JIeYibf5KGswPQ8ssKyMGsDtir7eKFssAOsILQc5PuMkuUkOqFfuuNvKeVLePmxrs1DfjWEv(Ru1GboSkTyP4XIyYq1LrTzi6ZQQgTK0Pj1QfjOxRcmBHUTKA3u1VfmCvLJtIKwovEUOMoX1Ly7qQVRc14Ls68QOwpjI9J8qmSz1ZWNHpSz1bCocRmm61YAM1eC4St9n5aCx4BM6Owjk56Wjawief93mCDofw8jIgnVMzNvfjYmldsXoOEwDaNJ9ToO2ZAcoC2DkedUHniedcXG6miedsHbHyqPDqTth1tMDXrF9j8AMjo9)p7g2SsM7rgC1t9m58hpllxPKNvYCpAUQojYRzwXRLzFSmJrZEz2PGhxl6GppRK5(gU6fTo4M6zLm3x8AzQNv8mA2lZUfjmRK5(BuJMN6zLm3dt3CfwwZSKswc19v148mrxZ4tM5cYv0b)GApRkR)RkdQt72ZIHl(WMj3i7LHnRUef9WMmzw(Jtg2SS2)h5bHywDjk6Hniet9KjZkzUpjEZ5PEM7MWdBwDjk6HnzYSsM7ZFCYupljEZ5HnlR9)rEgmbJqyTC0Kz4AKi1jLOCEyZQlrrpSjtM5crEyZQlrrpSjtMmRoGZX(VRuD2jhFLIJtTUoP6nh1jvpq7)tTRtQEZrDs1d0()0R7mR5MCaUl8DkedUHniedcXG6miedsHbHyqPDqTth1tMHm4ftReEqDs7SmRulSpHheIz5KBKheIznbho7wZSMGdNDTG)ZZGcEEMJ)1bp25pEMoj4N1eC4SZ0kHhecumRoGZXELmO2ZAcoC2PksKzwgeQNPXNvHffvJsfpDJXkSm7IJRfDWFJ9It))ZU8WgeIHntC6)F2nSzY5pEwsjlH6zjLSeQ7LZF8mgn7LzmA2lZGj(gLQZYLggn7LkogPU1zwLwGnSNLuYsOg6wZZqw8jIo4vwf6racqac4yP48ea5nMz6XEC6racqacqpcqacqa6racqacqpcqacqa6racqacqpcqacqa6rVzjLSeQNHS4teDWRSk0JaeGaeqrfjab(CAVOm8t3yKavyHaOmGxImbUjIg9vyC4Qqpcqacqa6racqacedj3ibCeiLiamZ3d6wC3C6o(xh8zLwkxHffvJsfpDJXkSKYPG0D8Vo4PhbiabiqmKCJeOHaPebo54RWPQ7wZkdxDrKGh(Heaom3TxP0ceuQ0F6gJvyPxnkHFibChsa4gNuCC3erh8QlIe8yC9x8kmCvOhbiabia9iabiabAqLXs3ySsq7LSYQqpcqacqGguzS0veNUPiSYWlETa)qca)lEpZo4QqpcqacqGguzS0veNUPiSYWLZFm8dja88hhJWvHEeGaeGanOYyPRioDtryLHBFCmc)qca)0ngjqfwiac4QqpcqacqafvKaeObvglDfXPBkcRmC7JJr4hsa4hXO1OzcuHf4Qqpcqacqa6racqac4yP48eqCfMEShNE0JE0JE0JE0JE0JE0JE0JE0JE0JE0JE0JE0JE0JE0JE0JEZYLggn7fRGePU1z9N6Ay9gw3JWMXOzVKNvb2DtLwoQVfiSwocwqPOEyw1JGTsFwsjlH6(QACEMORz8jZkEXP))z3WMmzqDg2mXP))z3WMjN)4zz5kL8SINrZEz2TiHzLm3NRgowv)upJrZEzw3erh8eagZ3MiplxAy0SxQ4yK6wNzvAb2WEwjZ95pogHU18uplxAy0SxScsK6wN1FQRH1ByDpcBwUA4yv9ZYvdhRQ)uieXdh7Nv8Az2x8EMDZkzUV41Yupl)XXi0TMhuAsJctMv8It))ZUHnl)XXi0TMhuAsJctMmzwDaNJ9Nhu7zhRXLQdQt72ZW15V49Sj3KdYZSsDDWtGpwsXZAcoC2blFMLbHaXmFPgZP))zxEqkmRvvrImZYGuafTNv8It))ZUHnR41YSpwMmdxN)I3ZWkj4NblVWoK3eo1HvsWNtDThD)XHisC3L9bxDO4Lgx4y)SSCtoixjO9Ym1QIHPkkNjCRYPqm4g2G6SuffDqGcyqbfqrBf6adD6GafdPIOgggKcdQ9KjZYZ6KoI0BNE7zOheI02bXKna