mirror of
https://github.com/curl/curl.git
synced 2026-06-07 17:24:21 +03:00
drop FATAL, do it separate PR
This commit is contained in:
parent
f63d275137
commit
7070a7ea14
46 changed files with 46 additions and 46 deletions
|
|
@ -26,7 +26,7 @@
|
|||
package appveyor;
|
||||
|
||||
use strict;
|
||||
use warnings 'FATAL' => 'all';
|
||||
use warnings;
|
||||
|
||||
BEGIN {
|
||||
use base qw(Exporter);
|
||||
|
|
|
|||
|
|
@ -26,7 +26,7 @@
|
|||
package azure;
|
||||
|
||||
use strict;
|
||||
use warnings 'FATAL' => 'all';
|
||||
use warnings;
|
||||
|
||||
BEGIN {
|
||||
use base qw(Exporter);
|
||||
|
|
|
|||
|
|
@ -24,7 +24,7 @@
|
|||
###########################################################################
|
||||
|
||||
use strict;
|
||||
use warnings 'FATAL' => 'all';
|
||||
use warnings;
|
||||
|
||||
use File::Basename;
|
||||
use File::Spec;
|
||||
|
|
|
|||
|
|
@ -25,7 +25,7 @@
|
|||
package configurehelp;
|
||||
|
||||
use strict;
|
||||
use warnings 'FATAL' => 'all';
|
||||
use warnings;
|
||||
use Exporter;
|
||||
|
||||
use vars qw(
|
||||
|
|
|
|||
|
|
@ -34,7 +34,7 @@
|
|||
# curl -vkL https://localhost:<protoport>/11
|
||||
|
||||
use strict;
|
||||
use warnings 'FATAL' => 'all';
|
||||
use warnings;
|
||||
use 5.006;
|
||||
|
||||
BEGIN {
|
||||
|
|
|
|||
|
|
@ -25,7 +25,7 @@
|
|||
package directories;
|
||||
|
||||
use strict;
|
||||
use warnings 'FATAL' => 'all';
|
||||
use warnings;
|
||||
|
||||
BEGIN {
|
||||
use base qw(Exporter);
|
||||
|
|
|
|||
|
|
@ -41,7 +41,7 @@
|
|||
#
|
||||
|
||||
use strict;
|
||||
use warnings 'FATAL' => 'all';
|
||||
use warnings;
|
||||
|
||||
BEGIN {
|
||||
push(@INC, $ENV{'srcdir'}) if(defined $ENV{'srcdir'});
|
||||
|
|
|
|||
|
|
@ -25,7 +25,7 @@
|
|||
package getpart;
|
||||
|
||||
use strict;
|
||||
use warnings 'FATAL' => 'all';
|
||||
use warnings;
|
||||
|
||||
BEGIN {
|
||||
use base qw(Exporter);
|
||||
|
|
|
|||
|
|
@ -28,7 +28,7 @@
|
|||
package globalconfig;
|
||||
|
||||
use strict;
|
||||
use warnings 'FATAL' => 'all';
|
||||
use warnings;
|
||||
|
||||
BEGIN {
|
||||
use base qw(Exporter);
|
||||
|
|
|
|||
|
|
@ -24,7 +24,7 @@
|
|||
#***************************************************************************
|
||||
|
||||
use strict;
|
||||
use warnings 'FATAL' => 'all';
|
||||
use warnings;
|
||||
|
||||
BEGIN {
|
||||
push(@INC, $ENV{'srcdir'}) if(defined $ENV{'srcdir'});
|
||||
|
|
|
|||
|
|
@ -24,7 +24,7 @@
|
|||
#***************************************************************************
|
||||
|
||||
use strict;
|
||||
use warnings 'FATAL' => 'all';
|
||||
use warnings;
|
||||
|
||||
# This script invokes nghttpx properly to have it serve HTTP/2 for us.
|
||||
# nghttpx runs as a proxy in front of our "actual" HTTP/1 server.
|
||||
|
|
|
|||
|
|
@ -24,7 +24,7 @@
|
|||
#***************************************************************************
|
||||
|
||||
use strict;
|
||||
use warnings 'FATAL' => 'all';
|
||||
use warnings;
|
||||
|
||||
# This script invokes nghttpx properly to have it serve HTTP/3 for us.
|
||||
# nghttpx runs as a proxy in front of our "actual" HTTP/1 server.
|
||||
|
|
|
|||
|
|
@ -30,7 +30,7 @@
|
|||
# MEM sendf.c:232 free(f6520)
|
||||
|
||||
use strict;
|
||||
use warnings 'FATAL' => 'all';
|
||||
use warnings;
|
||||
|
||||
my $mallocs=0;
|
||||
my $callocs=0;
|
||||
|
|
|
|||
|
|
@ -50,7 +50,7 @@
|
|||
package pathhelp;
|
||||
|
||||
use strict;
|
||||
use warnings 'FATAL' => 'all';
|
||||
use warnings;
|
||||
use File::Spec;
|
||||
|
||||
BEGIN {
|
||||
|
|
|
|||
|
|
@ -25,7 +25,7 @@
|
|||
package processhelp;
|
||||
|
||||
use strict;
|
||||
use warnings 'FATAL' => 'all';
|
||||
use warnings;
|
||||
|
||||
BEGIN {
|
||||
use base qw(Exporter);
|
||||
|
|
|
|||
|
|
@ -24,7 +24,7 @@
|
|||
#***************************************************************************
|
||||
|
||||
use strict;
|
||||
use warnings 'FATAL' => 'all';
|
||||
use warnings;
|
||||
|
||||
BEGIN {
|
||||
push(@INC, $ENV{'srcdir'}) if(defined $ENV{'srcdir'});
|
||||
|
|
|
|||
|
|
@ -35,7 +35,7 @@
|
|||
package runner;
|
||||
|
||||
use strict;
|
||||
use warnings 'FATAL' => 'all';
|
||||
use warnings;
|
||||
use 5.006;
|
||||
|
||||
use File::Basename;
|
||||
|
|
|
|||
|
|
@ -57,7 +57,7 @@
|
|||
# given, this won't be a problem.
|
||||
|
||||
use strict;
|
||||
use warnings 'FATAL' => 'all';
|
||||
use warnings;
|
||||
use 5.006;
|
||||
use POSIX qw(strftime);
|
||||
|
||||
|
|
|
|||
|
|
@ -28,7 +28,7 @@
|
|||
# non-secure test harness servers.
|
||||
|
||||
use strict;
|
||||
use warnings 'FATAL' => 'all';
|
||||
use warnings;
|
||||
|
||||
BEGIN {
|
||||
push(@INC, $ENV{'srcdir'}) if(defined $ENV{'srcdir'});
|
||||
|
|
|
|||
|
|
@ -27,7 +27,7 @@
|
|||
package serverhelp;
|
||||
|
||||
use strict;
|
||||
use warnings 'FATAL' => 'all';
|
||||
use warnings;
|
||||
|
||||
BEGIN {
|
||||
use base qw(Exporter);
|
||||
|
|
|
|||
|
|
@ -31,7 +31,7 @@ package servers;
|
|||
use IO::Socket;
|
||||
use Time::HiRes;
|
||||
use strict;
|
||||
use warnings 'FATAL' => 'all';
|
||||
use warnings;
|
||||
|
||||
BEGIN {
|
||||
use base qw(Exporter);
|
||||
|
|
|
|||
|
|
@ -25,7 +25,7 @@
|
|||
package sshhelp;
|
||||
|
||||
use strict;
|
||||
use warnings 'FATAL' => 'all';
|
||||
use warnings;
|
||||
|
||||
BEGIN {
|
||||
use base qw(Exporter);
|
||||
|
|
|
|||
|
|
@ -27,7 +27,7 @@
|
|||
# Also creates the ssh configuration files needed for these tests.
|
||||
|
||||
use strict;
|
||||
use warnings 'FATAL' => 'all';
|
||||
use warnings;
|
||||
use Cwd;
|
||||
use Cwd 'abs_path';
|
||||
use Digest::MD5;
|
||||
|
|
|
|||
|
|
@ -28,7 +28,7 @@
|
|||
#
|
||||
|
||||
use strict;
|
||||
use warnings 'FATAL' => 'all';
|
||||
use warnings;
|
||||
use vars qw($Cpreprocessor);
|
||||
|
||||
#
|
||||
|
|
|
|||
|
|
@ -31,7 +31,7 @@
|
|||
#
|
||||
|
||||
use strict;
|
||||
use warnings 'FATAL' => 'all';
|
||||
use warnings;
|
||||
|
||||
my $dir = $ARGV[0] || die "specify directory!";
|
||||
|
||||
|
|
|
|||
|
|
@ -24,7 +24,7 @@
|
|||
###########################################################################
|
||||
|
||||
use strict;
|
||||
use warnings 'FATAL' => 'all';
|
||||
use warnings;
|
||||
|
||||
my $sort = 0;
|
||||
|
||||
|
|
|
|||
|
|
@ -39,7 +39,7 @@
|
|||
# Output all deviances to stderr.
|
||||
|
||||
use strict;
|
||||
use warnings 'FATAL' => 'all';
|
||||
use warnings;
|
||||
|
||||
# we may get the dir roots pointed out
|
||||
my $root=$ARGV[0] || ".";
|
||||
|
|
|
|||
|
|
@ -27,7 +27,7 @@
|
|||
# codes or references to non-existing curl manpages.
|
||||
|
||||
use strict;
|
||||
use warnings 'FATAL' => 'all';
|
||||
use warnings;
|
||||
|
||||
my $docsroot = $ARGV[0] || '.';
|
||||
|
||||
|
|
|
|||
|
|
@ -24,7 +24,7 @@
|
|||
###########################################################################
|
||||
|
||||
use strict;
|
||||
use warnings 'FATAL' => 'all';
|
||||
use warnings;
|
||||
|
||||
# the DISABLE options that can be set by configure
|
||||
my %disable;
|
||||
|
|
|
|||
|
|
@ -28,7 +28,7 @@
|
|||
#
|
||||
|
||||
use strict;
|
||||
use warnings 'FATAL' => 'all';
|
||||
use warnings;
|
||||
use vars qw($Cpreprocessor);
|
||||
|
||||
#
|
||||
|
|
|
|||
|
|
@ -28,7 +28,7 @@
|
|||
# Output all deviances to stderr.
|
||||
|
||||
use strict;
|
||||
use warnings 'FATAL' => 'all';
|
||||
use warnings;
|
||||
use File::Basename;
|
||||
|
||||
# get the file name first
|
||||
|
|
|
|||
|
|
@ -24,7 +24,7 @@
|
|||
###########################################################################
|
||||
|
||||
use strict;
|
||||
use warnings 'FATAL' => 'all';
|
||||
use warnings;
|
||||
|
||||
# we may get the dir root pointed out
|
||||
my $root = $ARGV[0] || ".";
|
||||
|
|
|
|||
|
|
@ -28,7 +28,7 @@
|
|||
#
|
||||
|
||||
use strict;
|
||||
use warnings 'FATAL' => 'all';
|
||||
use warnings;
|
||||
|
||||
my $manpage=$ARGV[0];
|
||||
my $header=$ARGV[1];
|
||||
|
|
|
|||
|
|
@ -28,7 +28,7 @@
|
|||
# files, manpages and symbols-in-versions are in sync.
|
||||
|
||||
use strict;
|
||||
use warnings 'FATAL' => 'all';
|
||||
use warnings;
|
||||
|
||||
use File::Basename;
|
||||
|
||||
|
|
|
|||
|
|
@ -24,7 +24,7 @@
|
|||
###########################################################################
|
||||
|
||||
use strict;
|
||||
use warnings 'FATAL' => 'all';
|
||||
use warnings;
|
||||
|
||||
my $root=$ARGV[0] || "..";
|
||||
|
||||
|
|
|
|||
|
|
@ -24,7 +24,7 @@
|
|||
###########################################################################
|
||||
|
||||
use strict;
|
||||
use warnings 'FATAL' => 'all';
|
||||
use warnings;
|
||||
|
||||
sub showline {
|
||||
my ($l) = @_;
|
||||
|
|
|
|||
|
|
@ -27,7 +27,7 @@
|
|||
# error codes.
|
||||
|
||||
use strict;
|
||||
use warnings 'FATAL' => 'all';
|
||||
use warnings;
|
||||
|
||||
# we may get the dir roots pointed out
|
||||
my $root=$ARGV[0] || ".";
|
||||
|
|
|
|||
|
|
@ -24,7 +24,7 @@
|
|||
###########################################################################
|
||||
|
||||
use strict;
|
||||
use warnings 'FATAL' => 'all';
|
||||
use warnings;
|
||||
|
||||
# we may get the dir root pointed out
|
||||
my $root=$ARGV[0] || ".";
|
||||
|
|
|
|||
|
|
@ -28,7 +28,7 @@
|
|||
#
|
||||
|
||||
use strict;
|
||||
use warnings 'FATAL' => 'all';
|
||||
use warnings;
|
||||
use vars qw($Cpreprocessor);
|
||||
use allversions;
|
||||
|
||||
|
|
|
|||
|
|
@ -28,7 +28,7 @@
|
|||
# string options.
|
||||
|
||||
use strict;
|
||||
use warnings 'FATAL' => 'all';
|
||||
use warnings;
|
||||
|
||||
my $root=$ARGV[0] || ".";
|
||||
my $incdir = "$root/include/curl";
|
||||
|
|
|
|||
|
|
@ -28,7 +28,7 @@
|
|||
#
|
||||
|
||||
use strict;
|
||||
use warnings 'FATAL' => 'all';
|
||||
use warnings;
|
||||
|
||||
my $curl = shift @ARGV;
|
||||
my $opt = shift @ARGV;
|
||||
|
|
|
|||
|
|
@ -24,7 +24,7 @@
|
|||
###########################################################################
|
||||
|
||||
use strict;
|
||||
use warnings 'FATAL' => 'all';
|
||||
use warnings;
|
||||
|
||||
# we may get the dir root pointed out
|
||||
my $root=$ARGV[0] || ".";
|
||||
|
|
|
|||
|
|
@ -30,7 +30,7 @@
|
|||
#
|
||||
|
||||
use strict;
|
||||
use warnings 'FATAL' => 'all';
|
||||
use warnings;
|
||||
|
||||
use allversions;
|
||||
|
||||
|
|
|
|||
|
|
@ -28,7 +28,7 @@
|
|||
package testutil;
|
||||
|
||||
use strict;
|
||||
use warnings 'FATAL' => 'all';
|
||||
use warnings;
|
||||
|
||||
BEGIN {
|
||||
use base qw(Exporter);
|
||||
|
|
|
|||
|
|
@ -24,7 +24,7 @@
|
|||
#***************************************************************************
|
||||
|
||||
use strict;
|
||||
use warnings 'FATAL' => 'all';
|
||||
use warnings;
|
||||
|
||||
BEGIN {
|
||||
push(@INC, $ENV{'srcdir'}) if(defined $ENV{'srcdir'});
|
||||
|
|
|
|||
|
|
@ -25,7 +25,7 @@
|
|||
package valgrind;
|
||||
|
||||
use strict;
|
||||
use warnings 'FATAL' => 'all';
|
||||
use warnings;
|
||||
|
||||
BEGIN {
|
||||
use base qw(Exporter);
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue