ext 0.1.0 → 0.1.1

data/README

@@ -1,6 +1,9 @@
 Externals is a project that allows you to use the workflow normally made
 possible by svn:externals in an SCM independent manner.
 
+Please report bugs to either http://rubyforge.org/projects/ext or 
+http://ext.lighthouseapp.com
+
 I was inspired to create this project because I had several projects that had
 a mix of plugins managed by git and by svn.  Git's submodule feature is 
 not exactly like svn:externals.  Basically, I don't like how you have to manually 
@@ -49,6 +52,12 @@ install         Usage: ext install <repository> [-b <branch>] [path]
                 type is not obvious from the repository URL, use the --scm,
                 --git, or --svn flags.
 
+freeze          ext freeze project [REVISION]
+                Locks a subproject into a specific revision/branch.  If no
+                revision is supplied, the current revision/branch of the
+                project will be used.  You can specify the project by name
+                or path.
+
 init            Creates a .externals file containing only [main]
                 It will try to determine the SCM used by the main project,
                 as well as the project type.  You don't have to specify

data/Rakefile

@@ -3,6 +3,33 @@ require 'rake/testtask'
 require 'rake/rdoctask'
 require 'rake/gempackagetask'
 
+root_dir = File.dirname(__FILE__)
+
+desc "Creates the starting repositories needed to run the tests.
+If you plan on running the tests, you only need
+ to run this once."
+task :prep_test do
+  Dir.chdir File.join(root_dir, 'test') do
+    
+    puts `rm -rf cleanreps`
+    Dir.mkdir('cleanreps')
+    Dir.chdir('cleanreps') do
+      %w(redhillonrails_core foreign_key_migrations).each do |p|
+        puts `cp ../setup/#{p}.svn.gz .`
+        puts `gzip -d #{p}.svn.gz`
+        puts `svnadmin create #{p}`
+        puts `svnadmin load #{p} < #{p}.svn`
+      end
+
+      %w(acts_as_list rails).each do |p|
+        puts `git clone --bare git://github.com/rails/#{p}.git #{p}.git`
+      end
+      
+      puts `git clone --bare git://github.com/azimux/engines.git engines.git`
+    end
+  end
+end
+
 Rake::TestTask.new('test') do |task|
   task.libs = [File.expand_path('lib'),File.expand_path('test')]
   task.pattern = './test/test_*.rb'
@@ -11,54 +38,54 @@ end
 
 gem_specification = Gem::Specification.new do |specification|
   specification.name = 'ext'
-  specification.version = '0.1.0'
+  specification.version = '0.1.1'
   specification.platform = Gem::Platform::RUBY
   specification.rubyforge_project = 'ext'
-  
-  specification.summary = 
-    %{Provides an SCM agnostic way to manage subprojects with a workflow similar 
-to the svn:externals feature of subversion.  It's particularly useful for rails 
+
+  specification.summary =
+    %{Provides an SCM agnostic way to manage subprojects with a workflow similar
+to the svn:externals feature of subversion.  It's particularly useful for rails
 projects that have some plugins managed by svn and some managed by git.}
-  specification.description = 
-    %{Provides an SCM agnostic way to manage subprojects with a workflow similar 
-to the scm:externals feature of subversion.  It's particularly useful for rails 
-projects that have some plugins managed by svn and some managed by git.  
-
-For example, "ext install git://github.com/rails/rails.git" from within a rails 
-application directory will realize that this belongs in the vendor/rails folder.  
-It will also realize that this URL is a git repository and clone it into that 
-folder.  
-
-It will also add the vendor/rails folder to the ignore feature for the SCM of 
-the main project.  Let's say that the main project is being managed by 
-subversion.  In that case it adds "rails" to the svn:ignore property of the 
-vendor folder.  It also adds the URL to the .externals file so that when this 
-project is checked out via "ext checkout" it knows where to fetch the 
-subprojects.  
-
-There are several other useful commands, such as init, touch_emptydirs, add_all, 
+  specification.description =
+    %{Provides an SCM agnostic way to manage subprojects with a workflow similar
+to the scm:externals feature of subversion.  It's particularly useful for rails
+projects that have some plugins managed by svn and some managed by git.
+
+For example, "ext install git://github.com/rails/rails.git" from within a rails
+application directory will realize that this belongs in the vendor/rails folder.
+It will also realize that this URL is a git repository and clone it into that
+folder.
+
+It will also add the vendor/rails folder to the ignore feature for the SCM of
+the main project.  Let's say that the main project is being managed by
+subversion.  In that case it adds "rails" to the svn:ignore property of the
+vendor folder.  It also adds the URL to the .externals file so that when this
+project is checked out via "ext checkout" it knows where to fetch the
+subprojects.
+
+There are several other useful commands, such as init, touch_emptydirs, add_all,
 export, status.  There's a tutorial at http://nopugs.com/ext-tutorial
 
 The reason I made this project is that I was frustrated by two things:
 
-1.  In my opinion, the workflow for svn:externals is far superior to 
-git-submodule.  
+1.  In my opinion, the workflow for svn:externals is far superior to
+git-submodule.
 
-2.  Even if git-submodule was as useful as svn:externals, I would still like a 
-uniform way to fetch all of the subprojects regardless of the SCM used to manage 
+2.  Even if git-submodule was as useful as svn:externals, I would still like a
+uniform way to fetch all of the subprojects regardless of the SCM used to manage
 the main project.}
-  
+
   specification.author = "Miles Georgi"
   specification.email = "azimux@gmail.com"
   specification.homepage = "http://nopugs.com/ext-tutorial"
-  
+
   specification.test_files = FileList['test/test_*.rb']
-  
+
   specification.bindir = "bin"
   specification.executables = ['ext']
   specification.default_executable = "ext"
-  
-  specification.files = ['Rakefile', 'README', 'MIT_LICENSE.txt'] + 
+
+  specification.files = ['Rakefile', 'README', 'MIT_LICENSE.txt'] +
     FileList['lib/**/*.rb']
   #specification.require_path = 'lib'
 end

data/lib/externals/configuration/configuration.rb

@@ -60,6 +60,28 @@ module Externals
         end
         value
       end
+      
+      def rm_setting key
+        key = key.to_s
+        found = nil
+        value = nil
+
+        rows.each_with_index do |row, index|
+          if row =~ SETTING_REGEX && key == $1
+            raise "found #{key} twice!" if found
+            found = index
+          end
+        end
+
+        if found
+          value = self[key]
+          if rows[found] !~ SET_SETTING_REGEX
+            raise "thought I found the row, but didn't"
+          end
+          rows.delete rows[found]
+        end
+        value
+      end
 
       def [] key
         setting(key)

data/lib/externals/ext.rb

@@ -9,8 +9,8 @@ require 'extensions/symbol'
 module Externals
   #exit status
   OBSOLETE_EXTERNALS_FILE = 15
-  
-  
+
+
   PROJECT_TYPES_DIRECTORY = File.join(File.dirname(__FILE__), '..', 'externals','project_types')
 
   # Full commands operate on the main project as well as the externals
@@ -49,6 +49,11 @@ module Externals
       feature offered by the SCM of the main project.  If the SCM
       type is not obvious from the repository URL, use the --scm,
       --git, or --svn flags."],
+    [:freeze, "ext freeze project [REVISION]", %{
+      Locks a subproject into a specific revision/branch.  If no
+      revision is supplied, the current revision/branch of the
+      project will be used.  You can specify the project by name
+      or path.}],
     [:init, "Creates a .externals file containing only [main]
       It will try to determine the SCM used by the main project,
       as well as the project type.  You don't have to specify
@@ -184,13 +189,13 @@ module Externals
         new(main_options).send(command, args, sub_options)
       end
     end
-    
+
     def self.externals_file_obsolete?
       return false if !File.exists?('.externals')
-      
+
       open('.externals', 'r') do |f|
         f.read =~ /^\s*\[git\]\s*$|^\s*\[main\]\s*$|^\s*\[svn\]\s*$/
-      end      
+      end
     end
 
     def print_commands(commands)
@@ -241,6 +246,17 @@ module Externals
       p
     end
 
+    def subproject_by_name_or_path name
+      name = name.strip
+      project = subprojects.detect {|p| p.path.strip == name}
+      project ||= subprojects.detect do |p|
+        File.split(p.path).last.strip == name
+      end
+      project ||= subprojects.detect do |p|
+        p.name == name
+      end
+    end
+
     def subprojects
       s = []
       projects.each do |project|
@@ -248,7 +264,7 @@ module Externals
       end
       s
     end
-    
+
     def main_project
       projects.detect {|p| p.main_project?}
     end
@@ -275,12 +291,12 @@ module Externals
 
       if options[:upgrade_externals_file]
         type ||= options[:type]
-        
+
 
         if type
           install_project_type type
         else
-          
+
           possible_project_types = self.class.project_types.select do |project_type|
             self.class.project_type_detector(project_type).detected?
           end
@@ -378,6 +394,31 @@ Please use
       end
     end
 
+    def freeze args, options
+      project = subproject_by_name_or_path(args[0])
+
+      raise "No such project named #{args[0]}" unless project
+
+      revision = args[1] || project.current_revision
+
+      branch = if project.freeze_involves_branch?
+        project.current_branch
+      end
+
+      section = configuration[project.path]
+      if section[:branch]
+        if branch
+          section[:branch] = branch
+        else
+          section.rm_setting :branch
+        end
+      end
+      section[:revision] = revision
+      configuration.write '.externals'
+
+      subproject_by_name_or_path(args[0]).up
+    end
+
     def install args, options
       init args, options unless File.exists? '.externals'
       repository = args[0]
@@ -396,16 +437,16 @@ that you are installing. Use an option to specify it
 (such as --git or --svn)"
       end
 
-      project = self.class.project_class(scm).new(:repository => repository, 
+      project = self.class.project_class(scm).new(:repository => repository,
         :path => path || path_calculator.new, :scm => scm)
       path = project.path
-      
+
       raise "no path" unless path
-      
+
       raise "already exists" if configuration[path]
-      
+
       project.branch = options[:branch] if options[:branch]
-      
+
       attributes = project.attributes.dup
       attributes.delete(:path)
       configuration[path] = project.attributes
@@ -613,7 +654,7 @@ Please use the --type option to tell ext which to use."
       config = Configuration::Configuration.new_empty
 
       raise ".externals already exists" if File.exists?('.externals')
-      
+
       config.add_empty_section '.'
 
       config['.'][:scm] = scm

data/lib/externals/project.rb

@@ -14,9 +14,9 @@ module Externals
       end
     end
     
-    VALID_ATTRIBUTES = [:name, :path, :repository, :branch, :type, :scm].map(&:to_s)
+    VALID_ATTRIB = [:name, :path, :repository, :branch, :type, :scm, :revision].map(&:to_s)
     
-    attr_attr_accessor VALID_ATTRIBUTES
+    attr_attr_accessor VALID_ATTRIB
     def attributes
       @attributes ||= {}
     end
@@ -26,6 +26,10 @@ module Externals
     def main_project?
       path == '.'
     end
+    
+    def freeze_involves_branch?
+      true
+    end
 
     def self.scm
       raise "subclass responsibility"
@@ -49,10 +53,10 @@ module Externals
         new_hash
       end
       
-      invalid_attributes = hash.keys - VALID_ATTRIBUTES
+      inVALID_ATTRIB = hash.keys - VALID_ATTRIB
       
-      if !invalid_attributes.empty?
-        raise "invalid attribute(s): #{invalid_attributes.join(', ')}"
+      if !inVALID_ATTRIB.empty?
+        raise "invalid attribute(s): #{inVALID_ATTRIB.join(', ')}"
       end
 
       path = hash.delete('path')

data/lib/externals/scms/git_project.rb

@@ -1,10 +1,13 @@
+require File.join(File.dirname(__FILE__), '..', 'project')
+
+
 module Externals
   class GitProject < Project
-    
+
     def default_branch
       'master'
     end
-    
+
     def co *args
       puts "path is #{path} repository is #{repository}"
       if path != '.'
@@ -18,11 +21,22 @@ module Externals
 
       puts(gitclonecmd = "git clone \"#{repository}\" #{dest}")
       puts `#{gitclonecmd}`
+
+      change_to_branch_revision
+    end
+
+    def change_to_branch_revision
       if branch
         Dir.chdir path do
           puts `git checkout --track -b #{branch} origin/#{branch}`
         end
       end
+
+      if revision
+        Dir.chdir path do
+          puts `git checkout #{revision}`
+        end
+      end
     end
 
     def ex *args
@@ -40,15 +54,18 @@ module Externals
       puts(gitclonecmd = "git clone --depth 1 \"#{repository}\" #{dest}")
 
       puts `#{gitclonecmd}`
-      if branch
-        puts `cd #{path}; git checkout --track -b #{branch} origin/#{branch}`
-      end
+
+      change_to_branch_revision
     end
 
     def up *args
-      puts "updating #{path}:"
-      Dir.chdir path do
-        puts `git pull`
+      if revision
+        change_to_branch_revision
+      else
+        puts "updating #{path}:"
+        Dir.chdir path do
+          puts `git pull`
+        end
       end
     end
 
@@ -81,8 +98,6 @@ module Externals
       puts `git add .`
     end
 
-
-    protected
     def ignore_contains? path
       text = ignore_text
       text.split(/\n/).detect {|r| r.strip == path.strip}
@@ -100,7 +115,7 @@ module Externals
     def append_ignore path
       rows = ignore_text || ''
       return if rows.index path.strip
-      
+
       rows = rows.split(/\n/)
       rows << path.strip
 
@@ -112,11 +127,27 @@ module Externals
       end
     end
 
+    def current_revision
+      Dir.chdir path do
+        if `git show HEAD` =~ /^\s*commit\s*([0-9a-fA-F]*)\s*$/i
+          $1
+        end
+      end
+    end
+
+    def current_branch
+      Dir.chdir path do
+        if `git branch -a` =~ /^\s*\*\s*([^\s]*)\s*$/
+          $1
+        end
+      end
+    end
+
     def extract_name s
       if s =~ /\/([\w_-]+)(?:\.git)?$/
         $1
       end
     end
-    
+
   end
 end

data/lib/externals/scms/svn_project.rb

@@ -1,30 +1,52 @@
+require File.join(File.dirname(__FILE__), '..', 'project')
+
 module Externals
   class SvnProject < Project
-    
+
     def default_branch
       nil
     end
-    
+
     def co *args
       (rmdircmd = "rmdir #{path}")
 
       `#{rmdircmd}` if File.exists? path
       puts(svncocmd = "svn co #{repository} #{path}")
       puts `#{svncocmd}`
+
+      change_to_revision
+    end
+
+    def change_to_revision
+      if revision
+        Dir.chdir path do
+          puts `svn up -r #{revision}`
+        end
+      end
     end
 
     def ex *args
       (rmdircmd = "rmdir #{path}")
 
+      url = repository
+
+      if revision
+        url += "@#{revision}"
+      end
+
       `#{rmdircmd}` if File.exists? path
       puts(svncocmd = "svn export #{repository} #{path}")
       puts `#{svncocmd}`
     end
 
     def up *args
-      puts "updating #{path}:"
-      Dir.chdir path do
-        puts `svn up .`
+      if revision
+        change_to_revision
+      else
+        puts "updating #{path}:"
+        Dir.chdir path do
+          puts `svn up .`
+        end
       end
     end
 
@@ -69,8 +91,6 @@ module Externals
       end
     end
 
-
-    protected
     def ignore_contains? path
       ignore_text(path) =~ Regexp.new("^\\s*#{File.basename(path)}\\s*$")
     end
@@ -99,5 +119,18 @@ module Externals
       end
       ignore_text
     end
+
+    def current_revision
+      Dir.chdir path do
+        if `svn info` =~ /Revision:\s*(\d+)\s*$/
+          $1
+        end
+      end
+    end
+
+    def freeze_involves_branch?
+      false
+    end
+
   end
 end

data/lib/externals/test_case.rb

@@ -1,9 +1,10 @@
 require 'test/unit'
 
 module Externals
-  class TestCase <  Test::Unit::TestCase
+  TestCase = Test::Unit::TestCase
+  module ExtTestCase
     protected
-    
+
     def initialize_test_git_repository
       scm = 'git'
       Dir.chdir(File.join(File.dirname(__FILE__), '..', '..', 'test')) do
@@ -17,21 +18,21 @@ module Externals
             Line 2
             Line 3"
             end
-          
+
             `git add .`
             `git commit -m "added readme.txt"`
-          
+
             open 'readme.txt', 'a' do |f|
               f.write "line 4"
             end
-          
+
             `git add .`
             `git commit -m "added a line to readme.txt"`
           end
         end
       end
     end
-    
+
     def initialize_test_svn_repository
       scm = 'svn'
       Dir.chdir(File.join(File.dirname(__FILE__), '..', '..', 'test')) do
@@ -41,27 +42,27 @@ module Externals
         end
       end
     end
-  
-    def destroy_test_repository scm 
+
+    def destroy_test_repository scm
       puts(rmcmd = "rm -rf #{repository_dir(scm)}")
       puts `#{rmcmd}`
     end
-   
+
     def repository_dir scm = nil
       if scm.nil?
-        File.join(File.dirname(__FILE__), '..', '..', 'test', 'repositories') 
+        File.join(File.dirname(__FILE__), '..', '..', 'test', 'repositories')
       else
         File.expand_path(File.join(repository_dir, "#{scm}repo"))
       end
     end
-   
+
     def create_test_modules_repository scm
       Dir.chdir(File.join(File.dirname(__FILE__), '..', '..', 'test')) do
         `mkdir repositories` unless File.exists? 'repositories'
         Dir.chdir 'repositories' do
           puts `svnadmin create #{scm}modulesrepo`
         end
-        
+
         cmd = "svn checkout \"file:///#{File.expand_path(File.join('repositories', "#{scm}modulesrepo"))}\""
         puts "about to run #{cmd}"
         puts `#{cmd}`
@@ -70,7 +71,7 @@ module Externals
             open("modules.txt", "w") do |f|
               f.write "line1 of modules.txt\n"
             end
-          
+
             SvnProject.add_all
             puts `svn commit -m "created modules.txt"`
           end
@@ -78,23 +79,23 @@ module Externals
         `rm -rf #{scm}modulesrepo`
       end
     end
-    
-    def destroy_test_modules_repository scm 
+
+    def destroy_test_modules_repository scm
       puts(rmcmd = "rm -rf #{modules_repository_dir(scm)}")
       puts `#{rmcmd}`
       puts(rmcmd = "rm -rf #{modules_repository_dir(scm)}")
       puts `#{rmcmd}`
     end
-    
+
     def modules_repository_dir scm = nil
       if scm.nil?
-        File.join(File.dirname(__FILE__), '..', '..', 'test', 'repositories') 
+        File.join(File.dirname(__FILE__), '..', '..', 'test', 'repositories')
       else
         File.expand_path(File.join(repository_dir, "#{scm}modulesrepo"))
       end
     end
-    
-    
+
+
     def create_rails_application
       Dir.mkdir applications_dir unless File.exists?(applications_dir)
       Dir.chdir applications_dir do
@@ -105,32 +106,27 @@ module Externals
         end
       end
     end
-    
+
     def windows?
       ENV['OS'] =~ /^Win/i
     end
-    
+
     def destroy_rails_application
       Dir.chdir applications_dir do
         `rm -rf rails_app`
       end
     end
-    
+
     def root_dir
       File.expand_path(File.join(File.dirname(__FILE__), '..', '..'))
     end
-    
+
     def applications_dir
       File.join(root_dir, 'test', 'applications')
     end
-    
+
     def rails_application_dir
       File.join(applications_dir, 'rails_app')
     end
-    
-    public
-    def test_true
-      assert true
-    end
   end
 end

data/test/test_checkout_git.rb

@@ -4,6 +4,8 @@ require 'externals/ext'
 
 module Externals
   class TestCheckoutGit < TestCase
+    include ExtTestCase
+    
     def setup
       initialize_test_git_repository
 

data/test/test_checkout_with_subprojects_git.rb

@@ -4,6 +4,9 @@ require 'externals/ext'
 
 module Externals
   class TestCheckoutWithSubprojectsGit < TestCase
+    include ExtTestCase
+    
+    
     def setup
       destroy_rails_application
       create_rails_application
@@ -24,11 +27,11 @@ module Externals
           `git init`
           Ext.run "init"
           raise " could not create .externals"  unless File.exists? '.externals'
-          Ext.run "install", "git://github.com/rails/acts_as_list.git"
+          Ext.run "install", File.join(root_dir, 'test', 'cleanreps', "acts_as_list.git")
 
           #install a couple svn managed subprojects
           %w(foreign_key_migrations redhillonrails_core).each do |proj|
-            Ext.run "install", "--svn", "http://redhillonrails.rubyforge.org/svn/trunk/vendor/plugins/#{proj}"
+            Ext.run "install", "--svn", 'file:///' + File.join(root_dir, 'test', 'cleanreps', proj)
           end
 
           GitProject.add_all

data/test/test_checkout_with_subprojects_svn.rb

@@ -4,6 +4,8 @@ require 'externals/ext'
 
 module Externals
   class TestCheckoutWithSubprojectsSvn < TestCase
+    include ExtTestCase
+    
     def setup
       destroy_rails_application
       create_rails_application
@@ -35,16 +37,16 @@ module Externals
           Ext.run "init"
           raise " could not create .externals"  unless File.exists? '.externals'
           %w(rails acts_as_list).each do |proj|
-            Ext.run "install", "git://github.com/rails/#{proj}.git"
+            Ext.run "install", File.join(root_dir, 'test', 'cleanreps', "#{proj}.git")
           end
 
           #install a couple svn managed subprojects
           %w(foreign_key_migrations redhillonrails_core).each do |proj|
-            Ext.run "install", "--svn", "http://redhillonrails.rubyforge.org/svn/trunk/vendor/plugins/#{proj}"
+            Ext.run "install", "--svn", "file:///#{File.join(root_dir, 'test', 'cleanreps', proj)}"
           end
 
           #install project with a branch
-          Ext.run "install", "git://github.com/azimux/engines.git", "-b", "edge"
+          Ext.run "install", File.join(root_dir, 'test', 'cleanreps', 'engines.git'), "-b", "edge"
 
           #install project with a non-default path
           Ext.run "install", "--svn", "file:///#{modules_repository_dir('svn')}", "modules"
@@ -159,7 +161,9 @@ module Externals
               assert(ignore_text =~ /^rails$/)
 
               Dir.chdir File.join('vendor', 'rails') do
-                assert `git show 92f944818eece9fe4bc62ffb39accdb71ebc32be` !~ /azimux/
+                #can't check this if it's local.  It seems --depth 1 is ignored for
+                #repositories on the local machine.
+                #assert `git show 92f944818eece9fe4bc62ffb39accdb71ebc32be` !~ /azimux/
               end
 
               %w(foreign_key_migrations redhillonrails_core acts_as_list).each do |proj|

data/test/test_freeze_to_revision.rb

@@ -0,0 +1,108 @@
+$:.unshift File.join(File.dirname(__FILE__), '..', 'lib') if $0 == __FILE__
+require 'externals/test_case'
+require 'externals/ext'
+
+module Externals
+  class TestFreezeToRevision < TestCase
+    include ExtTestCase
+    
+    def setup
+      destroy_rails_application
+      create_rails_application
+
+      Dir.chdir File.join(root_dir, 'test') do
+        parts = 'workdir/checkout/rails_app/vendor/plugins/foreign_key_migrations/lib/red_hill_consulting/foreign_key_migrations/active_record/connection_adapters/.svn/text-base/table_definition.rb.svn-base'.split('/')
+        if File.exists? File.join(*parts)
+          Dir.chdir File.join(*(parts[0..-2])) do
+            File.delete parts[-1]
+          end
+        end
+        `rm -rf workdir`
+        `mkdir workdir`
+        `cp -r #{rails_application_dir} workdir`
+        Dir.chdir File.join('workdir','rails_app') do
+          Ext.run "touch_emptydirs"
+
+          `git init`
+          Ext.run "init"
+          raise " could not create .externals"  unless File.exists? '.externals'
+          Ext.run "install", File.join(root_dir, 'test', 'cleanreps', "acts_as_list.git")
+
+          #install a couple svn managed subprojects
+          %w(foreign_key_migrations redhillonrails_core).each do |proj|
+            Ext.run "install", "--svn", 'file:///' + File.join(root_dir, 'test', 'cleanreps', proj)
+          end
+
+          Ext.run "freeze", "foreign_key_migrations", "2"
+          Ext.run "freeze", "acts_as_list", "9baff190a52c05cc542bfcaa7f77a91ce669f2f8"
+
+          GitProject.add_all
+          `git commit -m "created empty rails app with some subprojects"`
+        end
+      end
+    end
+
+    def teardown
+      destroy_rails_application
+
+      Dir.chdir File.join(root_dir, 'test') do
+        parts = 'workdir/checkout/rails_app/vendor/plugins/foreign_key_migrations/lib/red_hill_consulting/foreign_key_migrations/active_record/connection_adapters/.svn/text-base/table_definition.rb.svn-base'.split('/')
+        if File.exists? File.join(*parts)
+          Dir.chdir File.join(*(parts[0..-2])) do
+            File.delete parts[-1]
+          end
+        end
+        `rm -rf workdir`
+      end
+      #      Dir.chdir File.join(root_dir, 'test') do
+      #        `rm -rf workdir`
+      #      end
+      #XXX
+    end
+
+
+    def test_freeze_to_revision
+      Dir.chdir File.join(root_dir, 'test') do
+        Dir.chdir 'workdir' do
+          `mkdir checkout`
+          Dir.chdir 'checkout' do
+            source = File.join(root_dir, 'test', 'workdir', 'rails_app')
+            puts "About to checkout #{ source}"
+            Ext.run "checkout", "--git", source
+
+            Dir.chdir 'rails_app' do
+              assert File.exists?('.git')
+
+              assert File.exists?('.gitignore')
+
+              %w(foreign_key_migrations redhillonrails_core acts_as_list).each do |proj|
+                assert(File.read('.gitignore') =~ /^vendor[\/\\]plugins[\/\\]#{proj}$/)
+              end
+
+              Dir.chdir File.join('vendor', 'plugins') do
+                Dir.chdir 'acts_as_list' do
+                  %w(8771a632dc26a7782800347993869c964133ea29
+                  27a941c80ccaa8afeb9bfecb84c0ff098d8ba962
+                  9baff190a52c05cc542bfcaa7f77a91ce669f2f8
+                  ).each do |hash|
+                    assert `git show #{hash}` =~ /^commit\s*#{hash}$/i
+                  end
+                  assert `git show HEAD` !~ /^\s*commit\s*8771a632dc26a7782800347993869c964133ea29\s*$/i
+                  assert `git show HEAD` =~ /^\s*commit\s*9baff190a52c05cc542bfcaa7f77a91ce669f2f8\s*$/i
+                end
+
+                Dir.chdir 'foreign_key_migrations' do
+                  assert `svn info` =~ /^Revision:\s*2\s*$/i
+                end
+              end
+
+              %w(foreign_key_migrations redhillonrails_core acts_as_list).each do |proj|
+                assert File.exists?(File.join('vendor', 'plugins',proj, 'lib'))
+              end
+            end
+          end
+        end
+      end
+    end
+  end
+end

data/test/test_init_git.rb

@@ -4,6 +4,8 @@ require 'externals/ext'
 
 module Externals
   class TestInitGit < TestCase
+    include ExtTestCase
+    
     def setup
       initialize_test_git_repository
       Dir.chdir File.join(root_dir, 'test') do

data/test/test_rails_detection.rb

@@ -5,6 +5,8 @@ require 'externals/ext'
 
 module Externals
   class TestRailsDetection < TestCase
+    include ExtTestCase
+    
     def setup
       destroy_rails_application
       create_rails_application

data/test/test_string_extensions.rb

@@ -5,6 +5,8 @@ require 'externals/ext'
 
 module Externals
   class TestStringExtensions < TestCase
+    include ExtTestCase
+    
     def test_classify
       assert_equal "yourmom".classify, "Yourmom"
       assert_equal "your_mom".classify, "YourMom"

data/test/test_touch_emptydirs.rb

@@ -5,6 +5,8 @@ require 'externals/ext'
 
 module Externals
   class TestTouchEmptydirs < TestCase
+    include ExtTestCase
+    
     def setup
       Dir.chdir File.join(root_dir, 'test') do
         `mkdir workdir`

data/test/test_upgrade_externals_file.rb

@@ -4,6 +4,8 @@ require 'externals/ext'
 
 module Externals
   class TestUpgradeExternalsFile < TestCase
+    include ExtTestCase
+    
     def test_upgrade
       Dir.chdir File.join(root_dir, 'test') do
         `rm -rf test_upgrade`

metadata

@@ -1,7 +1,7 @@
 --- !ruby/object:Gem::Specification 
 name: ext
 version: !ruby/object:Gem::Version 
-  version: 0.1.0
+  version: 0.1.1
 platform: ruby
 authors: 
 - Miles Georgi
@@ -9,11 +9,11 @@ autorequire:
 bindir: bin
 cert_chain: []
 
-date: 2008-09-24 00:00:00 -07:00
+date: 2008-10-17 00:00:00 -07:00
 default_executable: ext
 dependencies: []
 
-description: "Provides an SCM agnostic way to manage subprojects with a workflow similar  to the scm:externals feature of subversion.  It's particularly useful for rails  projects that have some plugins managed by svn and some managed by git.    For example, \"ext install git://github.com/rails/rails.git\" from within a rails  application directory will realize that this belongs in the vendor/rails folder.   It will also realize that this URL is a git repository and clone it into that  folder.    It will also add the vendor/rails folder to the ignore feature for the SCM of  the main project.  Let's say that the main project is being managed by  subversion.  In that case it adds \"rails\" to the svn:ignore property of the  vendor folder.  It also adds the URL to the .externals file so that when this  project is checked out via \"ext checkout\" it knows where to fetch the  subprojects.    There are several other useful commands, such as init, touch_emptydirs, add_all,  export, status.  There's a tutorial at http://nopugs.com/ext-tutorial  The reason I made this project is that I was frustrated by two things:  1.  In my opinion, the workflow for svn:externals is far superior to  git-submodule.    2.  Even if git-submodule was as useful as svn:externals, I would still like a  uniform way to fetch all of the subprojects regardless of the SCM used to manage  the main project."
+description: "Provides an SCM agnostic way to manage subprojects with a workflow similar to the scm:externals feature of subversion.  It's particularly useful for rails projects that have some plugins managed by svn and some managed by git.  For example, \"ext install git://github.com/rails/rails.git\" from within a rails application directory will realize that this belongs in the vendor/rails folder. It will also realize that this URL is a git repository and clone it into that folder.  It will also add the vendor/rails folder to the ignore feature for the SCM of the main project.  Let's say that the main project is being managed by subversion.  In that case it adds \"rails\" to the svn:ignore property of the vendor folder.  It also adds the URL to the .externals file so that when this project is checked out via \"ext checkout\" it knows where to fetch the subprojects.  There are several other useful commands, such as init, touch_emptydirs, add_all, export, status.  There's a tutorial at http://nopugs.com/ext-tutorial  The reason I made this project is that I was frustrated by two things:  1.  In my opinion, the workflow for svn:externals is far superior to git-submodule.  2.  Even if git-submodule was as useful as svn:externals, I would still like a uniform way to fetch all of the subprojects regardless of the SCM used to manage the main project."
 email: azimux@gmail.com
 executables: 
 - ext
@@ -64,11 +64,12 @@ rubyforge_project: ext
 rubygems_version: 1.2.0
 signing_key: 
 specification_version: 2
-summary: Provides an SCM agnostic way to manage subprojects with a workflow similar  to the svn:externals feature of subversion.  It's particularly useful for rails  projects that have some plugins managed by svn and some managed by git.
+summary: Provides an SCM agnostic way to manage subprojects with a workflow similar to the svn:externals feature of subversion.  It's particularly useful for rails projects that have some plugins managed by svn and some managed by git.
 test_files: 
 - test/test_checkout_git.rb
 - test/test_checkout_with_subprojects_git.rb
 - test/test_checkout_with_subprojects_svn.rb
+- test/test_freeze_to_revision.rb
 - test/test_init_git.rb
 - test/test_rails_detection.rb
 - test/test_string_extensions.rb