haml 3.2.0.alpha.10 → 3.2.0.alpha.13

data/vendor/sass/test/sass/templates/warn.sass

@@ -1,3 +0,0 @@
-@warn "In the main file"
-@import warn_imported.sass
-+emits-a-warning

data/vendor/sass/test/sass/templates/warn_imported.sass

@@ -1,4 +0,0 @@
-@warn "Imported"
-
-=emits-a-warning
-  @warn "In an imported mixin"

data/vendor/sass/test/sass/test_helper.rb

@@ -1,8 +0,0 @@
-test_dir = File.dirname(__FILE__)
-$:.unshift test_dir unless $:.include?(test_dir)
-
-class Test::Unit::TestCase
-  def absolutize(file)
-    File.expand_path("#{File.dirname(__FILE__)}/#{file}")
-  end
-end

data/vendor/sass/test/sass/util/subset_map_test.rb

@@ -1,91 +0,0 @@
-#!/usr/bin/env ruby
-require File.dirname(__FILE__) + '/../../test_helper'
-
-class SubsetMapTest < Test::Unit::TestCase
-  def setup
-    @ssm = Sass::Util::SubsetMap.new
-    @ssm[Set[1, 2]] = "Foo"
-    @ssm[Set["fizz", "fazz"]] = "Bar"
-
-    @ssm[Set[:foo, :bar]] = "Baz"
-    @ssm[Set[:foo, :bar, :baz]] = "Bang"
-
-    @ssm[Set[:bip, :bop, :blip]] = "Qux"
-    @ssm[Set[:bip, :bop]] = "Thram"
-  end
-
-  def test_equal_keys
-    assert_equal [["Foo", Set[1, 2]]], @ssm.get(Set[1, 2])
-    assert_equal [["Bar", Set["fizz", "fazz"]]], @ssm.get(Set["fizz", "fazz"])
-  end
-
-  def test_subset_keys
-    assert_equal [["Foo", Set[1, 2]]], @ssm.get(Set[1, 2, "fuzz"])
-    assert_equal [["Bar", Set["fizz", "fazz"]]], @ssm.get(Set["fizz", "fazz", 3])
-  end
-
-  def test_superset_keys
-    assert_equal [], @ssm.get(Set[1])
-    assert_equal [], @ssm.get(Set[2])
-    assert_equal [], @ssm.get(Set["fizz"])
-    assert_equal [], @ssm.get(Set["fazz"])
-  end
-
-  def test_disjoint_keys
-    assert_equal [], @ssm.get(Set[3, 4])
-    assert_equal [], @ssm.get(Set["fuzz", "frizz"])
-    assert_equal [], @ssm.get(Set["gran", 15])
-  end
-
-  def test_semi_disjoint_keys
-    assert_equal [], @ssm.get(Set[2, 3])
-    assert_equal [], @ssm.get(Set["fizz", "fuzz"])
-    assert_equal [], @ssm.get(Set[1, "fazz"])
-  end
-
-  def test_empty_key_set
-    assert_raise(ArgumentError) {@ssm[Set[]] = "Fail"}
-  end
-
-  def test_empty_key_get
-    assert_equal [], @ssm.get(Set[])
-  end
-
-  def test_multiple_subsets
-    assert_equal [["Foo", Set[1, 2]], ["Bar", Set["fizz", "fazz"]]], @ssm.get(Set[1, 2, "fizz", "fazz"])
-    assert_equal [["Foo", Set[1, 2]], ["Bar", Set["fizz", "fazz"]]], @ssm.get(Set[1, 2, 3, "fizz", "fazz", "fuzz"])
-
-    assert_equal [["Baz", Set[:foo, :bar]]], @ssm.get(Set[:foo, :bar])
-    assert_equal [["Baz", Set[:foo, :bar]], ["Bang", Set[:foo, :bar, :baz]]], @ssm.get(Set[:foo, :bar, :baz])
-  end
-
-  def test_bracket_bracket
-    assert_equal ["Foo"], @ssm[Set[1, 2, "fuzz"]]
-    assert_equal ["Baz", "Bang"], @ssm[Set[:foo, :bar, :baz]]
-  end
-
-  def test_order_preserved
-    @ssm[Set[10, 11, 12]] = 1
-    @ssm[Set[10, 11]] = 2
-    @ssm[Set[11]] = 3
-    @ssm[Set[11, 12]] = 4
-    @ssm[Set[9, 10, 11, 12, 13]] = 5
-    @ssm[Set[10, 13]] = 6
-
-    assert_equal(
-      [[1, Set[10, 11, 12]], [2, Set[10, 11]], [3, Set[11]], [4, Set[11, 12]],
-        [5, Set[9, 10, 11, 12, 13]], [6, Set[10, 13]]],
-      @ssm.get(Set[9, 10, 11, 12, 13]))
-  end
-
-  def test_multiple_equal_values
-    @ssm[Set[11, 12]] = 1
-    @ssm[Set[12, 13]] = 2
-    @ssm[Set[13, 14]] = 1
-    @ssm[Set[14, 15]] = 1
-
-    assert_equal(
-      [[1, Set[11, 12]], [2, Set[12, 13]], [1, Set[13, 14]], [1, Set[14, 15]]],
-      @ssm.get(Set[11, 12, 13, 14, 15]))
-  end
-end

data/vendor/sass/test/sass/util_test.rb

@@ -1,266 +0,0 @@
-#!/usr/bin/env ruby
-require File.dirname(__FILE__) + '/../test_helper'
-require 'pathname'
-
-class UtilTest < Test::Unit::TestCase
-  include Sass::Util
-
-  def test_scope
-    assert(File.exist?(scope("Rakefile")))
-  end
-
-  def test_to_hash
-    assert_equal({
-        :foo => 1,
-        :bar => 2,
-        :baz => 3
-      }, to_hash([[:foo, 1], [:bar, 2], [:baz, 3]]))
-  end
-
-  def test_map_keys
-    assert_equal({
-        "foo" => 1,
-        "bar" => 2,
-        "baz" => 3
-      }, map_keys({:foo => 1, :bar => 2, :baz => 3}) {|k| k.to_s})
-  end
-
-  def test_map_vals
-    assert_equal({
-        :foo => "1",
-        :bar => "2",
-        :baz => "3"
-      }, map_vals({:foo => 1, :bar => 2, :baz => 3}) {|k| k.to_s})
-  end
-
-  def test_map_hash
-    assert_equal({
-        "foo" => "1",
-        "bar" => "2",
-        "baz" => "3"
-      }, map_hash({:foo => 1, :bar => 2, :baz => 3}) {|k, v| [k.to_s, v.to_s]})
-  end
-
-  def test_powerset
-    return unless Set[Set[]] == Set[Set[]] # There's a bug in Ruby 1.8.6 that breaks nested set equality
-    assert_equal([[].to_set].to_set,
-      powerset([]))
-    assert_equal([[].to_set, [1].to_set].to_set,
-      powerset([1]))
-    assert_equal([[].to_set, [1].to_set, [2].to_set, [1, 2].to_set].to_set,
-      powerset([1, 2]))
-    assert_equal([[].to_set, [1].to_set, [2].to_set, [3].to_set,
-        [1, 2].to_set, [2, 3].to_set, [1, 3].to_set, [1, 2, 3].to_set].to_set,
-      powerset([1, 2, 3]))
-  end
-
-  def test_restrict
-    assert_equal(0.5, restrict(0.5, 0..1))
-    assert_equal(1, restrict(2, 0..1))
-    assert_equal(1.3, restrict(2, 0..1.3))
-    assert_equal(0, restrict(-1, 0..1))
-  end
-
-  def test_merge_adjacent_strings
-    assert_equal(["foo bar baz", :bang, "biz bop", 12],
-      merge_adjacent_strings(["foo ", "bar ", "baz", :bang, "biz", " bop", 12]))
-    str = "foo"
-    assert_equal(["foo foo foo", :bang, "foo foo", 12],
-      merge_adjacent_strings([str, " ", str, " ", str, :bang, str, " ", str, 12]))
-  end
-
-  def test_intersperse
-    assert_equal(["foo", " ", "bar", " ", "baz"],
-      intersperse(%w[foo bar baz], " "))
-    assert_equal([], intersperse([], " "))
-  end
-
-  def test_substitute
-    assert_equal(["foo", "bar", "baz", 3, 4],
-      substitute([1, 2, 3, 4], [1, 2], ["foo", "bar", "baz"]))
-    assert_equal([1, "foo", "bar", "baz", 4],
-      substitute([1, 2, 3, 4], [2, 3], ["foo", "bar", "baz"]))
-    assert_equal([1, 2, "foo", "bar", "baz"],
-      substitute([1, 2, 3, 4], [3, 4], ["foo", "bar", "baz"]))
-
-    assert_equal([1, "foo", "bar", "baz", 2, 3, 4],
-      substitute([1, 2, 2, 2, 3, 4], [2, 2], ["foo", "bar", "baz"]))
-  end
-
-  def test_strip_string_array
-    assert_equal(["foo ", " bar ", " baz"],
-      strip_string_array([" foo ", " bar ", " baz "]))
-    assert_equal([:foo, " bar ", " baz"],
-      strip_string_array([:foo, " bar ", " baz "]))
-    assert_equal(["foo ", " bar ", :baz],
-      strip_string_array([" foo ", " bar ", :baz]))
-  end
-
-  def test_paths
-    assert_equal([[1, 3, 5], [2, 3, 5], [1, 4, 5], [2, 4, 5]],
-      paths([[1, 2], [3, 4], [5]]))
-    assert_equal([[]], paths([]))
-    assert_equal([[1, 2, 3]], paths([[1], [2], [3]]))
-  end
-
-  def test_lcs
-    assert_equal([1, 2, 3], lcs([1, 2, 3], [1, 2, 3]))
-    assert_equal([], lcs([], [1, 2, 3]))
-    assert_equal([], lcs([1, 2, 3], []))
-    assert_equal([1, 2, 3], lcs([5, 1, 4, 2, 3, 17], [0, 0, 1, 2, 6, 3]))
-
-    assert_equal([1], lcs([1, 2, 3, 4], [4, 3, 2, 1]))
-    assert_equal([1, 2], lcs([1, 2, 3, 4], [3, 4, 1, 2]))
-  end
-
-  def test_lcs_with_block
-    assert_equal(["1", "2", "3"],
-      lcs([1, 4, 2, 5, 3], [1, 2, 3]) {|a, b| a == b && a.to_s})
-    assert_equal([-4, 2, 8],
-      lcs([-5, 3, 2, 8], [-4, 1, 8]) {|a, b| (a - b).abs <= 1 && [a, b].max})
-  end
-
-  def test_silence_warnings
-    old_stderr, $stderr = $stderr, StringIO.new
-    warn "Out"
-    assert_equal("Out\n", $stderr.string)
-    silence_warnings {warn "In"}
-    assert_equal("Out\n", $stderr.string)
-  ensure
-    $stderr = old_stderr
-  end
-
-  def test_sass_warn
-    assert_warning("Foo!") {sass_warn "Foo!"}
-  end
-
-  def test_silence_sass_warnings
-    old_stderr, $stderr = $stderr, StringIO.new
-    silence_sass_warnings {warn "Out"}
-    assert_equal("Out\n", $stderr.string)
-    silence_sass_warnings {sass_warn "In"}
-    assert_equal("Out\n", $stderr.string)
-  ensure
-    $stderr = old_stderr
-  end
-
-  def test_has
-    assert(has?(:instance_method, String, :chomp!))
-    assert(has?(:private_instance_method, Sass::Engine, :parse_interp))
-  end
-
-  def test_enum_with_index
-    assert_equal(%w[foo0 bar1 baz2],
-      enum_with_index(%w[foo bar baz]).map {|s, i| "#{s}#{i}"})
-  end
-
-  def test_enum_cons
-    assert_equal(%w[foobar barbaz],
-      enum_cons(%w[foo bar baz], 2).map {|s1, s2| "#{s1}#{s2}"})
-  end
-
-  def test_ord
-    assert_equal(102, ord("f"))
-    assert_equal(98, ord("bar"))
-  end
-
-  def test_flatten
-    assert_equal([1, 2, 3], flatten([1, 2, 3], 0))
-    assert_equal([1, 2, 3], flatten([1, 2, 3], 1))
-    assert_equal([1, 2, 3], flatten([1, 2, 3], 2))
-
-    assert_equal([[1, 2], 3], flatten([[1, 2], 3], 0))
-    assert_equal([1, 2, 3], flatten([[1, 2], 3], 1))
-    assert_equal([1, 2, 3], flatten([[1, 2], 3], 2))
-
-    assert_equal([[[1], 2], [3], 4], flatten([[[1], 2], [3], 4], 0))
-    assert_equal([[1], 2, 3, 4], flatten([[[1], 2], [3], 4], 1))
-    assert_equal([1, 2, 3, 4], flatten([[[1], 2], [3], 4], 2))
-  end
-
-  def test_set_hash
-    assert(set_hash(Set[1, 2, 3]) == set_hash(Set[3, 2, 1]))
-    assert(set_hash(Set[1, 2, 3]) == set_hash(Set[1, 2, 3]))
-
-    s1 = Set[]
-    s1 << 1
-    s1 << 2
-    s1 << 3
-    s2 = Set[]
-    s2 << 3
-    s2 << 2
-    s2 << 1
-    assert(set_hash(s1) == set_hash(s2))
-  end
-
-  def test_set_eql
-    assert(set_eql?(Set[1, 2, 3], Set[3, 2, 1]))
-    assert(set_eql?(Set[1, 2, 3], Set[1, 2, 3]))
-
-    s1 = Set[]
-    s1 << 1
-    s1 << 2
-    s1 << 3
-    s2 = Set[]
-    s2 << 3
-    s2 << 2
-    s2 << 1
-    assert(set_eql?(s1, s2))
-  end
-
-  def test_extract_and_inject_values
-    test = lambda {|arr| assert_equal(arr, with_extracted_values(arr) {|str| str})}
-
-    test[['foo bar']]
-    test[['foo {12} bar']]
-    test[['foo {{12} bar']]
-    test[['foo {{1', 12, '2} bar']]
-    test[['foo 1', 2, '{3', 4, 5, 6, '{7}', 8]]
-    test[['foo 1', [2, 3, 4], ' bar']]
-    test[['foo ', 1, "\n bar\n", [2, 3, 4], "\n baz"]]
-  end
-
-  def test_caller_info
-    assert_equal(["/tmp/foo.rb", 12, "fizzle"], caller_info("/tmp/foo.rb:12: in `fizzle'"))
-    assert_equal(["/tmp/foo.rb", 12, nil], caller_info("/tmp/foo.rb:12"))
-    assert_equal(["(sass)", 12, "blah"], caller_info("(sass):12: in `blah'"))
-    assert_equal(["", 12, "boop"], caller_info(":12: in `boop'"))
-    assert_equal(["/tmp/foo.rb", -12, "fizzle"], caller_info("/tmp/foo.rb:-12: in `fizzle'"))
-    assert_equal(["/tmp/foo.rb", 12, "fizzle"], caller_info("/tmp/foo.rb:12: in `fizzle {}'"))
-  end
-
-  def test_version_gt
-    assert_version_gt("2.0.0", "1.0.0")
-    assert_version_gt("1.1.0", "1.0.0")
-    assert_version_gt("1.0.1", "1.0.0")
-    assert_version_gt("1.0.0", "1.0.0.rc")
-    assert_version_gt("1.0.0.1", "1.0.0.rc")
-    assert_version_gt("1.0.0.rc", "0.9.9")
-    assert_version_gt("1.0.0.beta", "1.0.0.alpha")
-
-    assert_version_eq("1.0.0", "1.0.0")
-    assert_version_eq("1.0.0", "1.0.0.0")
-  end
-
-  def assert_version_gt(v1, v2)
-    #assert(version_gt(v1, v2), "Expected #{v1} > #{v2}")
-    assert(!version_gt(v2, v1), "Expected #{v2} < #{v1}")
-  end
-
-  def assert_version_eq(v1, v2)
-    assert(!version_gt(v1, v2), "Expected #{v1} = #{v2}")
-    assert(!version_gt(v2, v1), "Expected #{v2} = #{v1}")
-  end
-
-  class FooBar
-    def foo
-      Sass::Util.abstract(self)
-    end
-  end
-
-  def test_abstract
-    assert_raise_message(NotImplementedError,
-      "UtilTest::FooBar must implement #foo") {FooBar.new.foo}
-  end
-
-end

data/vendor/sass/test/test_helper.rb

@@ -1,69 +0,0 @@
-lib_dir = File.dirname(__FILE__) + '/../lib'
-
-require 'test/unit'
-require 'fileutils'
-$:.unshift lib_dir unless $:.include?(lib_dir)
-require 'sass'
-
-Sass::RAILS_LOADED = true unless defined?(Sass::RAILS_LOADED)
-
-module Sass::Script::Functions
-  def option(name)
-    Sass::Script::String.new(@options[name.value.to_sym].to_s)
-  end
-end
-
-class Test::Unit::TestCase
-  def munge_filename(opts = {})
-    return if opts.has_key?(:filename)
-    opts[:filename] = filename_for_test(opts[:syntax] || :sass)
-  end
-
-  def filename_for_test(syntax = :sass)
-    test_name = caller.
-      map {|c| Sass::Util.caller_info(c)[2]}.
-      compact.
-      map {|c| c.sub(/^(block|rescue) in /, '')}.
-      find {|c| c =~ /^test_/}
-    "#{test_name}_inline.#{syntax}"
-  end
-
-  def clean_up_sassc
-    path = File.dirname(__FILE__) + "/../.sass-cache"
-    FileUtils.rm_r(path) if File.exist?(path)
-  end
-
-  def assert_warning(message)
-    the_real_stderr, $stderr = $stderr, StringIO.new
-    yield
-
-    if message.is_a?(Regexp)
-      assert_match message, $stderr.string.strip
-    else
-      assert_equal message.strip, $stderr.string.strip
-    end
-  ensure
-    $stderr = the_real_stderr
-  end
-
-  def silence_warnings(&block)
-    Sass::Util.silence_warnings(&block)
-  end
-
-  def assert_raise_message(klass, message)
-    yield
-  rescue Exception => e
-    assert_instance_of(klass, e)
-    assert_equal(message, e.message)
-  else
-    flunk "Expected exception #{klass}, none raised"
-  end
-
-  def assert_raise_line(line)
-    yield
-  rescue Sass::SyntaxError => e
-    assert_equal(line, e.sass_line)
-  else
-    flunk "Expected exception on line #{line}, none raised"
-  end
-end

data/vendor/sass/vendor/fssm/Gemfile

@@ -1,3 +0,0 @@
-source "http://rubygems.org"
-
-gemspec