[svk-commit] r3106 - branches/git-storage/lib/SVK

[nobody at bestpractical.com]

Author: clsung
Date: Thu Oct 30 02:29:40 2008
New Revision: 3106

Modified:
   branches/git-storage/lib/SVK/Command.pm

Log:
- add checking in arg_depotpath

Modified: branches/git-storage/lib/SVK/Command.pm
==============================================================================
--- branches/git-storage/lib/SVK/Command.pm	(original)
+++ branches/git-storage/lib/SVK/Command.pm	Thu Oct 30 02:29:40 2008
@@ -740,6 +740,23 @@
 	($path, $view) = $self->create_view($depot->repos, $view, $rev);
     }
 
+    # GIT: new method here for constructing path_object sanely
+
+    if (my ($depotname, $path) = $arg =~ m{^/(.*?)(/.*)}) {
+        if ( my $repospath = $self->{xd}->{depotmap}{$depotname} ) {
+            if ($repospath =~ m{\.git/?$}) {
+                require SVK::Path::Git;
+                my $p = SVK::Path::Git->real_new
+                    ({ depot => SVK::Depot::Git->new({ repospath => $repospath, depotname => $depotname }),
+                       commit => 'HEAD',
+                       path => $path,
+                } );
+                return $p;
+            }
+        }
+
+    }
+
     return $self->{xd}->create_path_object
 	( depot => $depot,
 	  path => $path,