svn-command 0.0.3

data/test/shared/test_helper.rb

@@ -0,0 +1,3 @@
+require 'test/unit'
+require File.expand_path(File.dirname(__FILE__)+'/' + 'test_helpers/test_colorizer')
+require File.expand_path(File.dirname(__FILE__)+'/' + 'test_helpers/assertions')

data/test/shared/test_helpers/assertions.rb

@@ -0,0 +1,56 @@
+# Custom assertions
+class Test::Unit::TestCase
+  def assert_user_error(error_message)
+    assert_tag({
+      :attributes => { :id => "errorExplanation" },
+      :descendant => { 
+        :content => error_message
+      }
+    })
+  end
+
+  def assert_contains(container, expected_contents, failure_message = nil)
+    failure_message = build_message(failure_message, "Container <?> was expected to contain <?> but it didn't", container, expected_contents)
+    assert_block(failure_message) do
+      container.include?(expected_contents)
+    end
+  end
+
+  # Asserts that the block that is passed in causes the value of the specified variable (+variable+) to change.
+  # +variable+ should be a Proc that, when evaluated, returns the current value of the variable. 
+  #
+  # Options:
+  # * If the optional +:from+ option is supplied, it also asserts that it had that initial value.
+  # * If the optional +:to+ option is supplied, it also asserts that it changed _to_ that value.
+  #
+  # So instead of doing this:
+  #   assert_equal 1, Model.count
+  #   do_something_that_should_cause_count_to_increase
+  #   assert_equal 2, Model.count
+  # we can do this:
+  #   assert_changed(lambda {ErrorType.count}, :from => 1, :to => 2) do
+  #     do_something_that_should_cause_count_to_increase
+  #   end
+  # Or, if we don't care what it's changing _from_ as long as it increases in value _by_ 1, we can write this:
+  #   assert_changed(c = lambda {ErrorType.count}, :to => c.call+1) do
+  #     do_something_that_should_cause_count_to_increase
+  #   end
+  # instead of this:
+  #   before = Model.count
+  #   do_something_that_should_cause_count_to_increase
+  #   assert_equal before + 1, Model.count
+  #
+  def assert_changed(variable, options = {}, &block)
+    expected_from = options.delete(:from) || variable.call
+
+    assert_equal expected_from, variable.call
+
+    failure_message = build_message(failure_message, "The variable was expected to change from <?> to <?> but it didn't", variable.call, options.delete(:to) || "something else")
+    assert_block(failure_message) do
+      before = variable.call
+      yield
+      expected_to = options.delete(:to) || variable.call
+      before != variable.call and variable.call == expected_to
+    end
+  end
+end

data/test/shared/test_helpers/test_colorizer.rb

@@ -0,0 +1,106 @@
+require 'rubygems'
+require 'color'     # Warning: Make sure you have the *right* color gem! gem install color --source require.errtheblog.com
+module Test::Unit
+  
+  class Error
+    # the 'E' that is displayed as the tests are run
+    def single_character_display
+      "E".red.bold
+    end
+    
+    # the long message that is displayed after test is run
+    def long_display
+      backtrace = filter_backtrace(@exception.backtrace).join("\n    ")
+      [
+        "Error".red.bold, 
+        ":\n", 
+        "#@test_name:".white, 
+        "\n", "#{message}".red, 
+        "\n    #{backtrace}".gsub(/:(\d+):/,":#{'\1'.red}:")
+      ].join('')
+    end
+  end
+  
+  
+  class Failure
+    # the 'E' that is displayed as the tests are run
+    def single_character_display
+      "F".yellow.bold
+    end
+    
+    # the long message that is displayed after test is run
+    def long_display
+      location_display = if(location.size == 1)
+        location[0].sub(/\A(.+:\d+).*/, ' [\\1]')
+      else
+        "\n    [#{location.join("\n     ")}]"
+      end
+      [
+        "Failure".yellow.bold, 
+        ":\n","#@test_name".white, 
+        "#{location_display}".gsub(/:(\d+)/, ":#{'\1'.yellow}"), 
+        ":\n", "#@message".yellow
+      ].join('')
+    end
+  end
+  
+  # it is necessary to do a class_eval for the TestRunner class
+  # through the AutoRunner class, since the require in the AutoRunner
+  # class will overwrite what we do here otherwise.
+  # 
+  # We must do the same thing inside of the TestRunner class
+  # class_eval for the TestResult class.  We Modify the
+  # TestRunnerMediator class after the require is called,
+  # which will then modify the TestResult class.
+  #
+  # test_finished is the function that will output the
+  # '.' period during the test runs
+  #
+  # the to_s for TestResult class returns the string
+  # for the final tallied results
+  class AutoRunner
+    RUNNERS[:console] = proc do |r|
+      require 'test/unit/ui/console/testrunner'
+      Test::Unit::UI::Console::TestRunner.class_eval %q{
+        def test_finished(name)
+          output_single('.'.green, 1) unless (@already_outputted)
+          nl(3)
+          @already_outputted = false
+        end
+        
+        def create_mediator(suite)
+          require 'test/unit/ui/testrunnermediator'
+          Test::Unit::UI::TestRunnerMediator.class_eval %q{
+            def create_result
+              Test::Unit::TestResult.class_eval %q{
+                def to_s
+                  rc = [
+                      "#{run_count}".white.bold, 
+                      "tests".white
+                    ].join(' ')
+                  ac = [
+                      "#{assertion_count}".white.bold, 
+                      "assertions".white
+                    ].join(' ')
+                  fc = [
+                      "#{failure_count}".yellow.bold, 
+                      "failures".yellow
+                    ].join(' ')
+                  ec = [
+                      "#{error_count}".red.bold, 
+                      "errors".red
+                    ].join(' ')
+                  [rc, ac, fc, ec].join(', ')
+                end
+              }
+              TestResult.new
+            end
+          }
+          return Test::Unit::UI::TestRunnerMediator.new(suite)
+        end
+      }
+      Test::Unit::UI::Console::TestRunner
+    end
+  end
+  
+end

data/test/subversion_extensions_test.rb

@@ -0,0 +1,66 @@
+require File.dirname(__FILE__) + '/test_helper'
+require 'subversion_extensions'
+
+
+class SubversionExtensionsTest < Test::Unit::TestCase
+  def setup
+  end
+
+  def test_status_lines_filter
+    input = <<End
+M      gemables/calculator/test/calculator_test.rb
+X      gemables/calculator/tasks/shared
+?      gemables/calculator/lib/calculator_extensions.rb
+
+Performing status on external item at 'plugins/flubber/tasks/shared'
+
+Performing status on external item at 'applications/underlord/vendor/plugins/nifty'
+X      applications/underlord/vendor/plugins/nifty/tasks/shared
+X      applications/underlord/vendor/plugins/nifty/doc_include/template
+
+Performing status on external item at 'applications/underlord/vendor/plugins/nifty/tasks/shared'
+M      applications/underlord/vendor/plugins/nifty/tasks/shared/base.rake
+End
+    expected = <<End
+M      gemables/calculator/test/calculator_test.rb
+?      gemables/calculator/lib/calculator_extensions.rb
+M      applications/underlord/vendor/plugins/nifty/tasks/shared/base.rake
+End
+    
+    assert_equal expected, out = Subversion::Extensions.status_lines_filter( input ), out.inspect
+  end
+
+  def test_update_lines_filter
+    input = <<End
+U      gemables/calculator/test/calculator_test.rb
+U      gemables/calculator/tasks/shared
+U      gemables/calculator/lib/calculator_extensions.rb
+
+Fetching external item into 'plugins/flubber/tasks/shared'
+U      plugins/flubber/tasks/shared/blah.rb
+External at revision 134143078
+End
+    expected = <<End
+U      gemables/calculator/test/calculator_test.rb
+U      gemables/calculator/tasks/shared
+U      gemables/calculator/lib/calculator_extensions.rb
+U      plugins/flubber/tasks/shared/blah.rb
+End
+    
+    assert_equal expected, out = Subversion::Extensions.update_lines_filter( input ), out.inspect
+  end
+
+  def test_unadded_filter
+    input = <<End
+M      gemables/calculator/test/calculator_test.rb
+X      gemables/calculator/tasks/shared
+?      gemables/calculator/lib/calculator_extensions.rb
+End
+    expected = <<End
+?      gemables/calculator/lib/calculator_extensions.rb
+End
+    
+    assert_equal expected, out = Subversion::Extensions.unadded_lines_filter( input ), out.inspect
+    assert_equal ['gemables/calculator/lib/calculator_extensions.rb'], out = Subversion::Extensions.unadded_filter( input ), out.inspect
+  end
+end

data/test/subversion_test.rb

@@ -0,0 +1,99 @@
+$mock_subversion = true
+require File.dirname(__FILE__) + '/test_helper'
+
+class SubversionTest < Test::Unit::TestCase
+  def setup
+    Subversion.reset_executed
+  end
+
+  def test_add
+    Subversion.add('foo', 'bar', 'hello', 'world')
+    assert_equal 'svn add foo bar hello world', Subversion.executed.first
+  end
+
+  def test_ignore
+    Subversion.ignore('foo', 'some/path/foo')
+    assert_equal "svn propset svn:ignore 'foo' ./", Subversion.executed[1]
+    assert_equal "svn propset svn:ignore 'foo' some/path", Subversion.executed[3]
+  end
+
+  def test_externalize
+    Subversion.externalize('some/repo/path')
+    Subversion.externalize('some/repo/path', :as => 'foo')
+    Subversion.externalize('some/repo/path', :as => 'foo', :local_path => 'local/path')
+
+    assert_equal "svn propset svn:externals '#{'path'.ljust(29)} some/repo/path' ./", Subversion.executed[1]
+    assert_equal "svn propset svn:externals '#{'foo'.ljust(29)} some/repo/path' ./", Subversion.executed[3]
+    assert_equal "svn propset svn:externals '#{'foo'.ljust(29)} some/repo/path' local/path", Subversion.executed[5]
+  end
+
+  def test_remove
+    Subversion.remove 'foo', 'bar', 'hello/world'
+    assert_equal 'svn rm foo bar hello/world', Subversion.executed.first
+  end
+
+  def test_remove_without_delete
+    tmpdir = "tmp#{$$}"
+    entries = "#{tmpdir}/.svn/entries"
+    FileUtils.mkdir_p "#{tmpdir}/.svn", :mode => 0755
+    File.open entries, 'w' do |file|
+      file.write <<-EOS
+        <?xml version="1.0" encoding="utf-8"?>
+        <wc-entries
+          xmlns="svn:">
+        <entry
+          name="existing_file"
+          kind="file"/>
+        <entry
+          name="just_added_file"
+          schedule="add"
+          kind="file"/>
+        <entry
+          name="unchanging_file"
+          kind="file"/>
+        </wc-entries>
+      EOS
+    end
+    File.chmod(0444, entries)
+    FileUtils.touch ["#{tmpdir}/existing_file", "#{tmpdir}/just_added_file", "#{tmpdir}/unchanging_file"]
+
+    begin
+      doc = REXML::Document.new(IO.read(entries))
+      assert_not_nil REXML::XPath.first(doc, '//entry[@name="existing_file"]')
+      Subversion.remove_without_delete "#{tmpdir}/existing_file"
+      # the element should now be scheduled for delete
+      doc = REXML::Document.new(IO.read(entries))
+      assert_not_nil REXML::XPath.first(doc, '//entry[@name="existing_file"][@schedule="delete"]')
+
+      doc = REXML::Document.new(IO.read(entries))
+      assert_not_nil REXML::XPath.first(doc, '//entry[@name="just_added_file"][@schedule="add"]')
+      Subversion.remove_without_delete "#{tmpdir}/just_added_file"
+      doc = REXML::Document.new(IO.read(entries))
+      # the element should now be gone
+      assert_nil REXML::XPath.first(doc, '//entry[@name="just_added_file"]')
+    ensure
+      FileUtils.rm_r tmpdir
+    end
+  end
+
+  def test_revert
+    Subversion.revert 'foo', 'bar', 'hello/world'
+    assert_equal 'svn revert foo bar hello/world', Subversion.executed.first
+  end
+
+  def test_executable
+    Subversion.make_executable 'foo', 'bar', 'hello/world'
+    assert_equal "svn propset svn:executable '' foo", Subversion.executed[0]
+    assert_equal "svn propset svn:executable '' bar", Subversion.executed[1]
+    assert_equal "svn propset svn:executable '' hello/world", Subversion.executed[2]
+
+    Subversion.make_not_executable 'foo'
+    assert_equal "svn propdel svn:executable foo", Subversion.executed[3]
+  end
+
+  def test_status
+    Subversion.status 'foo'
+    assert_equal "svn status foo", Subversion.executed.first
+  end
+
+end

data/test/svn_command_test.rb

@@ -0,0 +1,455 @@
+$mock_subversion = true
+require File.dirname(__FILE__) + '/test_helper'
+require_local '../lib/svn_command.rb'
+require 'facets/core/string/to_re'
+require 'yaml'
+
+
+
+module Subversion
+class BaseSvnCommandTest < Test::Unit::TestCase
+  def setup
+    Subversion.reset_executed
+  end
+  def test_dummy_test
+    # Because it tries to run this base class too!
+  end
+end
+
+class SvnCommandTest < BaseSvnCommandTest
+  def test_invalid_quotes_gives_informative_error
+    assert_exception(ArgumentError, lambda { |exception|
+      assert_equal "Unmatched single quote: '", exception.message
+    }) do
+      SvnCommand.execute("foo -m 'stuff''")
+    end
+  end
+  def test_unrecognized_option
+    output = capture_output($stderr) do
+      assert_exception(SystemExit, lambda { |exception|
+      }) do
+        SvnCommand.execute("status --blarg")
+      end
+    end
+    assert_match /Unknown option '--blarg'/, output
+  end
+end
+
+class ArgEscapingTest < BaseSvnCommandTest
+  def test_argument_escaping
+    SvnCommand.execute( args = %q{commit -m 'a message with lots of !&`$0 |()<> garbage'} ) 
+    assert_equal "svn #{args} --force-log", Subversion.executed.join
+  end
+  def test_asterisk
+    # Don't worry, this'll never happen, because the shell will expand the * *before* it gets to SvnCommand. But if you *did* sneak in an asterisk to SvnCommand.execute somehow, this is what would happen...
+    SvnCommand.execute("add dir/* --non-recursive") 
+    assert_equal "svn add --non-recursive 'dir/*'", Subversion.executed.join
+  end
+  def test_multiline
+    SvnCommand.execute(args = "commit -m 'This is a
+      |multi-line
+      |message'".margin)
+    assert_equal "svn #{args} --force-log", Subversion.executed.join
+  end
+end
+
+#-----------------------------------------------------------------------------------------------------------------------------
+# Built-in subcommands
+
+# Test method_missing. Can we still call svn info, rm, etc. even if we haven't written subcommand modules for them?
+class SubcommandPassThroughTest < BaseSvnCommandTest
+  def test_1
+    SvnCommand.execute("rm -q file1 file2 --force")
+    assert_equal "svn rm -q file1 file2 --force", Subversion.executed.join
+  end
+  def test_2
+    SvnCommand.execute("info -q file1 file2 --force")
+    assert_equal "svn info -q file1 file2 --force", Subversion.executed.join
+  end
+end
+
+class SvnAddTest < BaseSvnCommandTest
+  def test_1
+  end
+  def test_2
+    SvnCommand.execute('add "a b"') 
+    assert_equal "svn add 'a b'", Subversion.executed.join
+  end
+  def test_3
+    SvnCommand.execute('add a b') 
+    assert_equal "svn add a b", Subversion.executed.join
+  end
+end
+
+class SvnCommitTest < BaseSvnCommandTest
+  def test_1
+    SvnCommand.execute("commit -m 'just an ordinary commit message!'") 
+    assert_equal "svn commit -m 'just an ordinary commit message!' --force-log", Subversion.executed.join
+  end
+  def test_lots_of_options
+    SvnCommand.execute("commit --non-recursive -q -m '' --targets some_file      ") 
+    assert_equal "svn commit --non-recursive -q -m '' --targets some_file --force-log", Subversion.executed.join
+  end
+  def test_that_complex_quoting_doesnt_confuse_it
+    original_message = "Can't decide how many \"'quotes'\" to use!"
+    SvnCommand.execute(%Q{commit -m "#{original_message.gsub('"', '\"')}"}) 
+
+    expected_escaped_part = %q{'Can'\\''t decide how many "'\\''quotes'\\''" to use!'}
+    assert_equal "svn commit -m #{expected_escaped_part} --force-log", Subversion.executed.join
+    assert_equal original_message, `echo #{expected_escaped_part}`.chomp    # We should have gotten back exactly what we put in originally
+  end
+end
+
+class SvnDiffTest < BaseSvnCommandTest
+  def test_1
+    SvnCommand.execute("diff -r 123:125") 
+    assert_equal [
+      "svn diff --diff-cmd colordiff ./ -r 123:125",
+      "svn status ./"
+    ], Subversion.executed
+  end
+  def test_2
+    #:fixme:
+    #capture_output { SvnCommand.execute("diff -r { 2006-07-01 }") }
+    #p Subversion.executed
+    # Currently does this, since it thinks the arity is 1: --diff-cmd colordiff 2006-07-01 } -r '{'
+    #assert_equal "svn diff --diff-cmd colordiff -r { 2006-07-01 }", Subversion.executed.join
+  end
+end
+
+class SvnHelpTest < BaseSvnCommandTest
+  def test_1
+    output = capture_output { SvnCommand.execute("help") }
+    assert_equal "svn help ", Subversion.executed.join
+    assert_match /wrapper/, output
+  end
+end
+
+class SvnLogTest < BaseSvnCommandTest
+  def test_1
+    capture_output { SvnCommand.execute("log") }
+    assert_equal "svn log ", Subversion.executed.join
+  end
+end
+
+class SvnStatusTest < BaseSvnCommandTest
+  # Duplicates a test in subversion_extensions_test.rb -- maybe can abbreviate this and leave the detailed filter tests to the other TestCase
+  def test_status_does_some_filtering
+    Subversion.stubs(:status).returns("
+M      gemables/calculator/test/calculator_test.rb
+X      gemables/calculator/tasks/shared
+?      gemables/calculator/lib/calculator_extensions.rb
+
+Performing status on external item at 'plugins/flubber/tasks/shared'
+
+Performing status on external item at 'applications/underlord/vendor/plugins/nifty'
+X      applications/underlord/vendor/plugins/nifty/tasks/shared
+X      applications/underlord/vendor/plugins/nifty/lib/calculator
+X      applications/underlord/vendor/plugins/nifty/doc_include/template
+
+Performing status on external item at 'applications/underlord/vendor/plugins/nifty/tasks/shared'
+M      applications/underlord/vendor/plugins/nifty/tasks/shared/base.rake
+")
+    
+    expected = <<End
+M      gemables/calculator/test/calculator_test.rb
+?      gemables/calculator/lib/calculator_extensions.rb
+M      applications/underlord/vendor/plugins/nifty/tasks/shared/base.rake
+End
+
+    assert_equal expected, out = capture_output { Subversion::SvnCommand.execute('st') }
+  end
+
+  def test_status_accepts_arguments
+    SvnCommand.execute('st -u /path/to/file1 file2')
+    assert_equal "svn status -u /path/to/file1 file2", Subversion.executed.join
+
+    Subversion.reset_executed
+    SvnCommand.execute('st dir --no-ignore')
+    # It will reorder some of the args (it puts all pass-through options and their args at the *beginning*), but that's okay...
+    assert_equal "svn status --no-ignore dir", Subversion.executed.join
+    
+  end
+end #class SvnStatusTest
+
+class SvnUpdateTest < BaseSvnCommandTest
+  def test_1
+    capture_output { SvnCommand.execute("up -q file1 file2 -r 17") }
+    assert_equal "svn update -q -r 17 file1 file2", Subversion.executed.join
+  end
+end
+
+#-----------------------------------------------------------------------------------------------------------------------------
+# Custom subcommands
+
+#-----------------------------------------------------------------------------------------------------------------------------
+class SvnEachUnaddedTest < BaseSvnCommandTest
+  def setup
+    super
+    Subversion.stubs(:status).returns("
+M      gemables/calculator/test/calculator_test.rb
+X      gemables/calculator/tasks/shared
+?      gemables/calculator/lib/calculator.rb
+")
+    FileUtils.mkdir_p('gemables/calculator/lib/')
+    File.open(@filename = 'gemables/calculator/lib/calculator.rb', 'w') do |file|
+      file.puts "line 1 of calculator.rb"
+    end
+  end
+  def teardown
+    file = 'gemables/calculator/lib/calculator.rb'
+    FileUtils.rm(file) if File.exist?(file)
+    FileUtils.rmdir('gemables/calculator/lib/')
+    FileUtils.rmdir('gemables/calculator/')
+    FileUtils.rmdir('gemables/')
+  end
+
+  def test_add
+    output = simulate_input('a') do
+      capture_output { SvnCommand.execute('each_unadded dir') }
+    end
+    assert_match /What do you want to do with .*calculator\.rb/, output
+    assert_match /Adding/, output
+    assert_equal "svn add gemables/calculator/lib/calculator.rb", Subversion.executed.join
+  end
+  def test_ignore
+    output = simulate_input('i') do
+      capture_output { SvnCommand.execute('each_unadded dir') }
+    end
+    assert_match /What do you want to do with .*calculator\.rb/, output
+    assert_match /Ignoring/, output
+    assert_equal [
+        "svn propget svn:ignore gemables/calculator/lib",
+        "svn propset svn:ignore 'calculator.rb' gemables/calculator/lib"
+      ], Subversion.executed
+  end
+  def test_preview_is_now_automatic
+    output = simulate_input(
+      #"p" +     # Preview
+      "\n"      # Blank line to do nothing (and exit loop)
+    ) do
+      capture_output { SvnCommand.execute('each_unadded dir') }
+    end
+    assert_match /What do you want to do with .*calculator\.rb/, output
+    assert_match "line 1 of calculator.rb".to_re, output
+  end
+  def test_delete
+    assert File.exist?( @filename ) 
+    output = simulate_input(
+      'd' +    # Delete
+      'y'     # Yes I'm sure
+    ) do
+      capture_output { SvnCommand.execute('each_unadded dir') }
+    end
+    assert_match /What do you want to do with .*calculator\.rb/, output
+    assert_match "Are you pretty much".to_re, output
+    assert_match /Deleting/, output
+    #print output
+    assert !File.exist?( @filename ) 
+  end
+end #class
+
+#-----------------------------------------------------------------------------------------------------------------------------
+# Ignore
+class SvnIgnoreTest < BaseSvnCommandTest
+  def test_svn_ignore_relative_to_wd
+    output = capture_output { SvnCommand.execute('ignore log') }
+    assert_equal '', output
+    assert_equal [
+      "svn propget svn:ignore ./",
+      "svn propset svn:ignore 'log' ./"
+    ], Subversion.executed
+  end
+  def test_svn_ignore_relative_to_other_path
+    output = capture_output { SvnCommand.execute('ignore log/*') }
+    assert_equal '', output
+    assert_equal [
+      "svn propget svn:ignore log",
+      "svn propset svn:ignore '*' log"
+    ], Subversion.executed
+  end
+end
+
+#-----------------------------------------------------------------------------------------------------------------------------
+# Externals
+
+# Since this doesn't work: Subversion::SvnCommand.any_instance.stubs(:system).returns(Proc.new {|a| p a; puts "Tried to call system(#{a})" })
+class Subversion::SvnCommand
+  def system(*args)
+    Subversion::SvnCommand.executed_system << args.join(' ')
+  end
+  def self.executed_system
+    @@executed_system ||= []
+  end
+  def self.reset_executed_system(as = [])
+    @@executed_system = as
+  end
+end
+
+class SvnExternalsTest < BaseSvnCommandTest
+
+  # Causes .stub to break??
+  #def setup
+  #end
+  def set_up_stubs   # This ought to just go in the normal "setup", but that caused weird errors. Ideas?
+    yaml = %q{
+    - !ruby/object:Subversion::ExternalsContainer
+      container_dir: /home/tyler/code/gemables/svn-command/test
+      entries: |+
+        shared http://code.qualitysmith.com/gemables/test_extensions/lib
+
+    - !ruby/object:Subversion::ExternalsContainer
+      container_dir: /home/tyler/code/gemables/svn-command/tasks
+      entries: |+
+        shared                        http://code.qualitysmith.com/gemables/shared_tasks/tasks
+
+    - !ruby/object:Subversion::ExternalsContainer
+      container_dir: /home/tyler/code/gemables/svn-command/doc_include
+      entries: |+
+        template                      http://code.qualitysmith.com/gemables/template/doc/template
+    }
+    external_containers = YAML.load yaml
+    Subversion.stubs(:externals_containers).returns(external_containers)
+  end
+
+  def test_svn_externalize
+    set_up_stubs
+    output = capture_output { SvnCommand.execute('externalize http://imaginethat.com/a/repo') }
+    assert_equal '', output
+    assert_equal [
+      "svn propget svn:externals ./",
+      "svn propset svn:externals 'repo                          http://imaginethat.com/a/repo' ./"
+    ], Subversion.executed
+  end
+
+
+  def test_svn_externals
+    set_up_stubs
+    output = capture_output { SvnCommand.execute('externals') }
+
+    assert_contains output, %q(
+    |/home/tyler/code/gemables/svn-command/test
+    |  * shared http://code.qualitysmith.com/gemables/test_extensions/lib
+    |/home/tyler/code/gemables/svn-command/tasks
+    |  * shared                        http://code.qualitysmith.com/gemables/shared_tasks/tasks
+    |/home/tyler/code/gemables/svn-command/doc_include
+    |  * template                      http://code.qualitysmith.com/gemables/template/doc/template
+    ).margin
+    assert_equal [], Subversion.executed
+  end
+
+  def test_svn_externals_containers
+    set_up_stubs
+    output = capture_output { SvnCommand.execute('externals_containers') } 
+
+    assert_contains output, %q(
+    |/home/tyler/code/gemables/svn-command/test
+    |/home/tyler/code/gemables/svn-command/tasks
+    |/home/tyler/code/gemables/svn-command/doc_include
+    ).margin
+    assert_equal [], Subversion.executed
+  end
+
+  def test_svn_edit_externals
+    set_up_stubs
+    output = simulate_input('yyy') do
+      capture_output { SvnCommand.execute('edit_externals') } 
+    end
+    assert_match "No directory specified. Editing externals for *all*".to_re, output
+
+    assert_match /Do you want to edit svn:externals for this directory/, output
+    assert_equal [
+      "svn propedit svn:externals /home/tyler/code/gemables/svn-command/test",
+      "svn propedit svn:externals /home/tyler/code/gemables/svn-command/tasks",
+      "svn propedit svn:externals /home/tyler/code/gemables/svn-command/doc_include"
+    ], Subversion::SvnCommand.executed_system
+  end
+end
+
+#-----------------------------------------------------------------------------------------------------------------------------
+# Commit messages
+
+class SvnGetMessageTest < BaseSvnCommandTest
+  def test_1
+    Subversion.stubs(:status_against_server).returns("Status against revision:     56")
+    output = simulate_input('i') do
+      capture_output { SvnCommand.execute('get_message') }
+    end
+    assert_match "Message for r56 :".to_re, output
+    assert_equal ["svn propget --revprop svn:log -r head"], Subversion.executed
+  end
+end
+
+class SvnSetMessageTest < BaseSvnCommandTest
+  def test_1
+    Subversion.stubs(:status_against_server).returns("Status against revision:     56")
+    output = simulate_input('i') do
+      capture_output { SvnCommand.execute('set_message "this is my message"') }
+    end
+    assert_match "Message before changing:".to_re, output
+    assert_match "Message for r56 :".to_re, output
+    assert_equal [
+      "svn propget --revprop svn:log -r head",
+      "svn propset --revprop svn:log -r head 'this is my message'"
+    ], Subversion.executed
+  end
+end
+
+class SvnEditMessageTest < BaseSvnCommandTest
+  def test_1
+    Subversion.stubs(:status_against_server).returns("Status against revision:     56")
+    output = simulate_input('i') do
+      capture_output { SvnCommand.execute('edit_message') }
+    end
+    assert_equal ["svn propedit --revprop svn:log -r head"], Subversion.executed
+  end
+end
+
+#-----------------------------------------------------------------------------------------------------------------------------
+
+class SvnViewCommitsTest < BaseSvnCommandTest
+  def test_parse_revision_ranges
+    assert_equal [134], SvnCommand.parse_revision_ranges(["134"])
+    assert_equal [134, 135, 136], SvnCommand.parse_revision_ranges(["134-136"])
+    assert_equal [134, 135, 136], SvnCommand.parse_revision_ranges(["134:136"])
+    assert_equal [134, 135, 136], SvnCommand.parse_revision_ranges(["134..136"])
+    assert_equal [134, 135, 136, 139], SvnCommand.parse_revision_ranges(["134-136", "139"])
+  end
+  def test_1
+    messages = Dictionary[
+      14, "Committed a bunch of really important stuff.",
+      15, "Fixed a typo.",
+      30, "Injected a horrible defect."
+    ]
+    Subversion.stubs(:log).with("-r 14 -v ").returns(messages[14])
+    Subversion.stubs(:log).with("-r 15 -v ").returns(messages[15])
+    Subversion.stubs(:log).with("-r 30 -v ").returns(messages[30])
+    Subversion.stubs(:diff).returns(combined_diff = %q(
+    |Index: lib/svn_command.rb
+    |===================================================================
+    |--- lib/svn_command.rb  (revision 2327)
+    |+++ lib/svn_command.rb  (revision 2342)
+    |@@ -3,9 +3,11 @@
+    | require 'facets/more/command'
+    | require 'facets/core/string/margin'
+    | require 'facets/core/kernel/require_local'
+    |+require 'extensions/symbol'
+    | require 'pp'
+    | require 'termios'
+    | require 'stringio'
+    |+require 'escape'    # http://www.a-k-r.org/escape/
+    ).margin)
+    output = capture_output { SvnCommand.execute('view-commits -r 14:15 30') }
+    assert_equal %Q(
+    |#{messages.values.join("\n")}
+    |#{combined_diff}
+    |
+    ).margin, output
+  end
+end
+
+
+#-----------------------------------------------------------------------------------------------------------------------------
+end #module Subversion
+
+