Subversion Repositories DevTools

Rev

Rev 1403 | Rev 2022 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 1403 Rev 1431
Line 130... Line 130...
130 
 
 130 
 
131 
#
 131 
#
132 
#   Create a SubVersion Session using the current workspace
 132 
#   Create a SubVersion Session using the current workspace
133 
#   as a basis. Error if not a workspace
 133 
#   as a basis. Error if not a workspace
134 
#
 134 
#
- 
 
 135 
#   Need abs path so that we can correctly detect modified build files
- 
 
 136 
#
- 
 
 137 
my $sessionRoot = getcwd();
135 
my $session = NewSessionByWS( '.' );
 138 
my $session = NewSessionByWS( $sessionRoot );
136 
 
 139 
 
137 
Verbose ("Determine the current workspace root" );
 140 
Verbose ("Determine the current workspace root" );
138 
$ws_root = $session->SvnLocateWsRoot(1) || '';
 141 
$ws_root = $session->SvnLocateWsRoot(1) || '';
139 
$pkg_root = $session->Full;
 142 
$pkg_root = $session->Full;
140 
 
 143