anchor.diff:  
   fetch 'slider',
     has_moved : false
  +  is_moving : false
     stance : 0
     stance_segment : getStanceSegment 0
   
  
positive.code:           # supporter' to 'neutral'
            return false if ev.originalEvent.type != 'mousemove'
  
            if !slider.has_moved
              slider.has_moved = true
  
            slider.stance_segment = getStanceSegment -ui.value
            slider.stance = -ui.value
  
  
negative.code:         stop : (ev, ui) =>
            if root.page_name == 'results'
              togglePage('crafting')
  
            # We save the slider's position to the server only on mouse-up.
            # This way you can drag it with good performance.
            your_opinion = @data(@data('root').your_opinion_key)
            slider = @data('slider')
            if your_opinion.stance != slider.stance
              your_opinion.stance         = slider.stance
              your_opinion.stance_segment = slider.stance_segment
              save(your_opinion)
  
            slider.is_moving = false
            save(slider)
  
    togglePage : (ev) ->
      root = @data('root')
  