 
   Editor::toggleBlocks = (cb) ->
     if @currentlyUsingBlocks
-      return @performMeltAnimation 500, 1000, cb
+      return @performMeltAnimation 700, 500, cb
     else
       return @performFreezeAnimation 500, 500, cb
 

        @highlightCanvas.style.opacity =
        @cursorCanvas.style.opacity = 0

      setTimeout (=>
        @iceElement.style.transition =
          @paletteWrapper.style.transition = "left #{translateTime}ms"
        @iceElement.style.left = '0px'
        @paletteWrapper.style.left = "#{-@paletteWrapper.offsetWidth}px"
      ), fadeTime

      setTimeout (=>
        # Translate the ICE editor div out of frame.

        ), translateTime

        @iceElement.style.transition =
          @paletteWrapper.style.transition = "left #{fadeTime}ms"

        @iceElement.style.left = "#{@paletteWrapper.offsetWidth}px"
        @paletteWrapper.style.left = '0px'
