Skip to content
GitLab
Menu
Projects
Groups
Snippets
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Menu
Open sidebar
emulab
emulab-devel
Commits
fa1c524b
Commit
fa1c524b
authored
Jun 30, 2010
by
Leigh B Stoller
Browse files
Minor tweak to how we control the use of Archiving; use only the
ARCHIVESUPPORT variable from configure.
parent
80f24eba
Changes
2
Hide whitespace changes
Inline
Side-by-side
db/Archive.pm.in
View file @
fa1c524b
#
!/usr/bin/perl -wT
#
#
EMULAB
-
COPYRIGHT
#
Copyright
(
c
)
2005
-
200
7
University
of
Utah
and
the
Flux
Group
.
#
Copyright
(
c
)
2005
-
20
1
0
University
of
Utah
and
the
Flux
Group
.
#
All
rights
reserved
.
#
package
Archive
;
...
...
@@ -32,7 +32,7 @@ use overload ('""' => 'Stringify');
my
$
TB
=
"@prefix@"
;
my
$
MAINSITE
=
@
TBMAINSITE
@;
my
$
ARCHSUPPORT
=
@
ARCHIVESUPPORT
@;
my
$
USEARCHIVE
=
($
MAINSITE
||
$
ARCHSUPPORT
)
;
my
$
USEARCHIVE
=
$
ARCHSUPPORT
;
my
%
ALLOWEDPID
=
(
"testbed"
=>
1
);
#
XXX
my
$
ARCHIVEDIR
=
"/usr/testbed/exparchive"
;
...
...
tbsetup/libArchive.pm.in
View file @
fa1c524b
#
!/usr/bin/perl -wT
#
#
EMULAB
-
COPYRIGHT
#
Copyright
(
c
)
2005
,
2006
,
2007
University
of
Utah
and
the
Flux
Group
.
#
Copyright
(
c
)
2005
-
2010
University
of
Utah
and
the
Flux
Group
.
#
All
rights
reserved
.
#
#
XXX
Need
to
deal
with
locking
at
some
point
...
...
...
@@ -33,7 +33,7 @@ use Time::HiRes qw(gettimeofday);
my
$
TB
=
"@prefix@"
;
my
$
MAINSITE
=
@
TBMAINSITE
@;
my
$
ARCHSUPPORT
=
@
ARCHIVESUPPORT
@;
my
$
USEARCHIVE
=
($
MAINSITE
||
$
ARCHSUPPORT
)
;
my
$
USEARCHIVE
=
$
ARCHSUPPORT
;
my
$
ZIPINFO
=
"/usr/local/bin/zipinfo"
;
my
$
TAR
=
"/usr/bin/tar"
;
...
...
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment