[svn:dbi] r15474 - dbi/branches/sqlengine

[email protected] Sat, 17 Nov 2012 06:11:52 -0800 (PST)
Newsgroups perl.dbi.changes
Message-ID <[email protected]>
Author: hmbrand
Date: Sat Nov 17 06:11:51 2012
New Revision: 15474

Modified:
   dbi/branches/sqlengine/git-svn-vsn.pl

Log:
Trying to catch up on the sqlengine branche

Modified: dbi/branches/sqlengine/git-svn-vsn.pl
==============================================================================
--- dbi/branches/sqlengine/git-svn-vsn.pl	(original)
+++ dbi/branches/sqlengine/git-svn-vsn.pl	Sat Nov 17 06:11:51 2012
@@ -18,9 +18,9 @@
     open my $gl, "-|", "git log -1 $f";
     my ($svn_id, $svn_date, $svn_author) = ("", "");
     while (<$gl>) {
-	m/git-svn-id:.*?trunk\@([0-9]+)/	and $svn_id	= $1;
-	m/^Date:\s*(.*)/			and $svn_date	= $1;
-	m/^Author:\s*(\S+)/			and $svn_author	= $1;
+	m/git-svn-id:.*?(?:trunk|sqlengine)\@([0-9]+)/	and $svn_id	= $1;
+	m/^Date:\s*(.*)/				and $svn_date	= $1;
+	m/^Author:\s*(\S+)/				and $svn_author	= $1;
 	}
     #print STDERR "  + $svn_id, $svn_author, $svn_date\n";
     $svn_id or return;