Subversion Repositories DevTools

Rev

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

Rev 295 Rev 3832
Line 192... Line 192...
192
 
192
 
193
    unless ( $UserAgentAvailable )
193
    unless ( $UserAgentAvailable )
194
    {
194
    {
195
        Warning ("The perl installation does not contain the LWP module",
195
        Warning ("The perl installation does not contain the LWP module",
196
                 "The test to extract data from Release Manager will be skipped",
196
                 "The test to extract data from Release Manager will be skipped",
197
                 "The deployment skrips will not run properly");
197
                 "The deployment scripts will not run properly");
198
        return 0;
198
        return 0;
199
    }
199
    }
200
 
200
 
201
    my $user_agent = LWP::UserAgent->new( timeout => 30 );
201
    my $user_agent = LWP::UserAgent->new( timeout => 30 );
202
    if ( $RM_URL )
202
    if ( $RM_URL )
Line 286... Line 286...
286
 
286
 
287
This program is provided to test the connection between the users computer and
287
This program is provided to test the connection between the users computer and
288
the Release Manager Database. It does this by querying the database in the
288
the Release Manager Database. It does this by querying the database in the
289
same manner as many of the deployments scripts.
289
same manner as many of the deployments scripts.
290
 
290
 
291
 
-
 
292
 
-
 
293
=head1 EXAMPLE
291
=head1 EXAMPLE
294
 
292
 
295
jats etool test_rmconnection
293
jats etool test_rmconnection
296
 
294
 
297
=cut
295
=cut