Skip to content

GitLab

Commit b17b7ba4 authored by Leigh B Stoller's avatar Leigh B Stoller
Browse files
Options

Perl 5.26 change; INC does not include "."

parent b846d709
Show whitespace changes
Inline Side-by-side
Showing with 4 additions and 1 deletion
db/dbupdate.in
View file @ b17b7ba4
#!/usr/bin/perl -w #!/usr/bin/perl -w
# #
# Copyright (c) 2009-2012 University of Utah and the Flux Group. # Copyright (c) 2009-2018 University of Utah and the Flux Group.
# #
# {{{EMULAB-LICENSE # {{{EMULAB-LICENSE
# #
...@@ -234,6 +234,9 @@ foreach my $file (@files) { ...@@ -234,6 +234,9 @@ foreach my $file (@files) {
# Undefine this to make sure we get a new version each file. # Undefine this to make sure we get a new version each file.
undef &DoUpdate; undef &DoUpdate;
# Perl 5.26 change.
$file = "./$file";
# This just loads the file. # This just loads the file.
my $return = do $file; my $return = do $file;
if (!defined($return)) { if (!defined($return)) {
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment