diff options
author | Dr. Stephen Henson <steve@openssl.org> | 2009-09-02 15:57:24 +0000 |
---|---|---|
committer | Dr. Stephen Henson <steve@openssl.org> | 2009-09-02 15:57:24 +0000 |
commit | 2d1cbca9605aa3a7f85d803aa17a71d6c283c93c (patch) | |
tree | 60c5f677f1d09ef7c10efa934e33d93cbcb091cd /apps | |
parent | fc680569172e938b5f1a6cb6acb53fbbaf59a5b6 (diff) |
PR: 2020
Submitted by: Keith Beckman <kbeckman@mcg.edu>, Tomas Mraz <tmraz@redhat.com>
Checked by: steve@openssl.org
Fix improperly capitalized references to WWW::Curl::Easy.
Diffstat (limited to 'apps')
-rw-r--r-- | apps/tsget | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/apps/tsget b/apps/tsget index ddae803fbf..03b3e5c837 100644 --- a/apps/tsget +++ b/apps/tsget @@ -1,13 +1,13 @@ #!/usr/bin/perl -w # Written by Zoltan Glozik <zglozik@stones.com>. # Copyright (c) 2002 The OpenTSA Project. All rights reserved. -$::version = '$Id: tsget,v 1.1 2006/02/12 23:11:21 ulf Exp $'; +$::version = '$Id: tsget,v 1.2 2009/09/02 15:57:24 steve Exp $'; use strict; use IO::Handle; use Getopt::Std; use File::Basename; -use WWW::Curl::easy; +use WWW::Curl::Easy; use vars qw(%options); @@ -37,7 +37,7 @@ sub create_curl { my $url = shift; # Create Curl object. - my $curl = WWW::Curl::easy::new(); + my $curl = WWW::Curl::Easy::new(); # Error-handling related options. $curl->setopt(CURLOPT_VERBOSE, 1) if $options{d}; @@ -192,4 +192,4 @@ REQUEST: foreach (@ARGV) { STDERR->printflush(", $output written.\n") if $options{v}; } $curl->cleanup(); -WWW::Curl::easy::global_cleanup(); +WWW::Curl::Easy::global_cleanup(); |