Let the world know what's playing.

git-svn-id: svn+ssh://src.earth.threerings.net/nenya/trunk@323 ed5b42cb-e716-0410-a449-f6a68f950b19

src/as/com/threerings/flash/AlphaFade.as

@@ -63,6 +63,5 @@ public class AlphaFade extends AnimationImpl
     protected var _to :Number;
     protected var _duration :Number;
     protected var _done :Function;
-    
 }
 }

src/as/com/threerings/flash/AnimationImpl.as

@@ -33,6 +33,11 @@ public class AnimationImpl implements Animation
         AnimationManager.stop(this);
     }
 
+    public function isPlaying () :Boolean
+    {
+        return AnimationManager.isPlaying(this);
+    }
+
     public function updateAnimation (elapsed :Number) :void
     {
         // please implement!

src/as/com/threerings/flash/AnimationManager.as

@@ -82,6 +82,14 @@ public class AnimationManager
         }
     }
 
+    /**
+     * Test to see if the specified animation has been started and not stopped.
+     */
+    public static function isPlaying (anim :Animation) :Boolean
+    {
+        return _anims.indexOf(anim) >= 0;
+    }
+
     /**
      * Track a DisplayObject that is also an Animation- it will
      * automatically be started when added to the stage and