[svk-commit] r2819 - trunk/lib/SVK

nobody at bestpractical.com nobody at bestpractical.com
Wed May 7 06:11:54 EDT 2008


Author: clsung
Date: Wed May  7 06:11:43 2008
New Revision: 2819

Modified:
   trunk/lib/SVK/Project.pm

Log:
- output current branch(tag/trunk) infomation only in any branch/tag/trunk

Modified: trunk/lib/SVK/Project.pm
==============================================================================
--- trunk/lib/SVK/Project.pm	(original)
+++ trunk/lib/SVK/Project.pm	Wed May  7 06:11:43 2008
@@ -321,11 +321,13 @@
 	    $bname = $target->_to_pclass($target->path)->relative($self->tag_location)->dir_list(0);
 	}
 
-	$logger->info ( loc("Current Branch: %1 (%2)\n", $bname, $where ));
-	$logger->info ( loc("Depot Path: (%1)\n", $target->depotpath ));
-	if ($where ne 'trunk') { # project trunk should not have Copied info
-	    for ($target->copy_ancestors) {
-		$logger->info( loc("Copied From: %1, Rev. %2\n", $_->[0], $_->[1]));
+	if ($where) {
+	    $logger->info ( loc("Current Branch: %1 (%2)\n", $bname, $where ));
+	    $logger->info ( loc("Depot Path: (%1)\n", $target->depotpath ));
+	    if ($where ne 'trunk') { # project trunk should not have Copied info
+		for ($target->copy_ancestors) {
+		    $logger->info( loc("Copied From: %1, Rev. %2\n", $_->[0], $_->[1]));
+		}
 	    }
 	}
     }


More information about the svk-commit mailing list