Subversion Repositories DevTools

Rev

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

Rev 367 Rev 1329
Line 65... Line 65...
65
            );
65
            );
66
 
66
 
67
 
67
 
68
#
68
#
69
#   Process views and determine information
69
#   Process views and determine information
-
 
70
#       Allow the use of '*' under Windows with a 'glob'
70
#
71
#
71
foreach my $view ( @ARGV )
72
foreach my $view ( map { glob } @ARGV )
72
{
73
{
73
    my $uuid;
74
    my $uuid;
-
 
75
 
-
 
76
    next if ( $view eq 'sandbox_dpkg_archive' );
-
 
77
    if ( -d $view )
-
 
78
    {
-
 
79
        Message ("Delete view path: $view");
-
 
80
        ClearTool( "--Quiet", "rmview $view" ) || Warning('Problem deleting view');
-
 
81
#        $opt_verbose = 1;
-
 
82
#        ClearTool( "rmview $view" );
-
 
83
        next;
-
 
84
    }
-
 
85
 
74
    #
86
    #
75
    #   If the view tag still exists then delete the view the hard way
87
    #   If the view tag still exists then delete the view the hard way
76
    #   Use 'lsview' to locate the views uuid
88
    #   Use 'lsview' to locate the views uuid
77
    #
89
    #
78
    Verbose("Look for View Tag");
90
    Verbose("Look for View Tag");
Line 167... Line 179...
167
 
179
 
168
jats ccdelete_view - Delete a clearcase views
180
jats ccdelete_view - Delete a clearcase views
169
 
181
 
170
=head1 SYNOPSIS
182
=head1 SYNOPSIS
171
 
183
 
172
  jats etool ccdelete_view [options] [viewtag]+
184
  jats etool ccdelete_view [options] [viewtag|viewpath]+
173
 
185
 
174
 Options:
186
 Options:
175
    -help[=n]           - brief help message
187
    -help[=n]           - brief help message
176
    -help -help         - Detailed help message
188
    -help -help         - Detailed help message
177
    -man[=n]            - Full documentation
189
    -man[=n]            - Full documentation
Line 209... Line 221...
209
 
221
 
210
=back
222
=back
211
 
223
 
212
=head1 DESCRIPTION
224
=head1 DESCRIPTION
213
 
225
 
214
This utility is used to delete a Clear Case views. It will
226
This utility is used to delete a Clear Case views. If the user provides a valid
-
 
227
directory then the view store and view path will be removed, otherwise the tool
-
 
228
assumes that a viewtag has been provided. It will:
215
 
229
 
216
=over 4
230
=over 4
217
 
231
 
218
=item 1
232
=item 1
219
 
233