[prev in list] [next in list] [prev in thread] [next in thread] 

List:       svk-commit
Subject:    [svk-commit] r2929 - trunk/lib/SVK/Command
From:       nobody () bestpractical ! com
Date:       2008-06-23 6:39:15
Message-ID: 20080623063915.9C2FC4D80FC () diesel ! bestpractical ! com
[Download RAW message or body]

Author: nothingmuch
Date: Mon Jun 23 02:39:14 2008
New Revision: 2929

Modified:
   trunk/lib/SVK/Command/Branch.pm

Log:
Improve the default br --create --tag message to say "Create tag" not "Create branch"

Modified: trunk/lib/SVK/Command/Branch.pm
==============================================================================
--- trunk/lib/SVK/Command/Branch.pm	(original)
+++ trunk/lib/SVK/Command/Branch.pm	Mon Jun 23 02:39:14 2008
@@ -283,7 +283,7 @@
 	    $branch_name, $self->{local} ? '(in local)' : '');
 
     $self->{parent} = 1;
-    $self->{message} ||= "- Create branch $branch_name";
+    $self->{message} ||= join(" ", "- Create", ($self->{tag} ? "tag" : "branch"), $branch_name);
     my $ret = $self->SUPER::run($src, $dst);
 
     if (!$ret) {
_______________________________________________
svk-commit mailing list
svk-commit@bestpractical.com
http://lists.bestpractical.com/cgi-bin/mailman/listinfo/svk-commit
[prev in list] [next in list] [prev in thread] [next in thread]