/cast Travel Form();
/cast Aquatic Form();
/script i=0; while (i < GetNumShapeshiftForms()) do i=i+1;x,y,z=GetShapeshiftFormInfo(i);if (z==1) then CastShapeshiftForm(i);end;end;
I found this on the druid forums one day and it changed my life.
It's an all-in-one mount/travel form/seal form button, depending on whether you're standing, running, or swimming. Just change 4,12 to whatever bag slot your mount is in.