2 # Work out paths in a subversion repository for branches or tags of the
3 # given directory. Works on current directory by default, or it can be given
8 # Get the svn url of the current directory.
9 my $url = `svn info @ARGV| grep -i ^URL: | cut -d ' ' -f 2`;
15 # Now jut substitute into it.
16 $url=~s!/(?:trunk|branches|tags|upstream)($|/)!/$wanted$1!;