Test cases for visualops.io service
user
```ruby
require File.expand_path('../helper', __FILE__)

class VisualOpsTest < Service::TestCase

  def setup
    @stubs = Faraday::Adapter::Test::Stubs.new
    @data = {'username' => 'someuser', 'app_list' => 'abc123, madeira:master, xyz456:devel', 'consumer_token' => 'madeira-visualops'}
  end

  def test_push
    svc = service :push, @data

    def svc.message_max_length; 4 end

    @stubs.post "/v1/apps" do |env|
      assert_equal 'api.visualops.io', env[:url].host
      body = JSON.parse(env[:body])
      assert_equal 'someuser',          body['user']
      assert_equal 'madeira-visualops', body['token']
      assert_equal ['abc123','madeira'], body['app']
      [200, {}, '']
    end

    svc.receive_push
  end

  def test_develop
    svc = service :push, @data,
      payload.update("ref" => "refs/heads/devel")

    @stubs.post "/v1/apps" do |env|
      assert_equal 'api.visualops.io', env[:url].host
      body = JSON.parse(env[:body])
      assert_equal 'someuser',          body['user']
      assert_equal 'madeira-visualops', body['token']
      assert_equal ['xyz456'], body['app']
      [200, {}, '']
    end

    svc.receive_push
  end

  def test_other_branch
    svc = service :push, @data,
      payload.update("ref" => "refs/heads/no-such-branch")

    @stubs.post "/v1/apps" do |env|
      raise "This should not be called"
    end

    svc.receive_push
  end

  def service(*args)
    super Service::VisualOps, *args
  end
end
```
assistant