Commit 0837d5db authored by Leigh B. Stoller's avatar Leigh B. Stoller
Browse files

Minor bug fix; add export of variable.

parent 2578c812
#!/usr/bin/perl -wT
#!/usr/bin/perl -w
#
# EMULAB-COPYRIGHT
# Copyright (c) 2008-2009 University of Utah and the Flux Group.
......@@ -10,7 +10,7 @@ package libvnode;
use Exporter;
@ISA = "Exporter";
@EXPORT = qw( VNODE_STATUS_RUNNING VNODE_STATUS_STOPPED VNODE_STATUS_BOOTING
VNODE_STATUS_INIT VNODE_STATUS_STOPPING
VNODE_STATUS_INIT VNODE_STATUS_STOPPING VNODE_STATUS_UNKNOWN
ipToMac macAddSep fatal mysystem
);
......@@ -21,7 +21,6 @@ sub VNODE_STATUS_INIT() { return "init"; }
sub VNODE_STATUS_STOPPING() { return "stopping"; }
sub VNODE_STATUS_UNKNOWN() { return "unknown"; }
sub ipToMac($) {
my $ip = shift;
......@@ -71,5 +70,6 @@ sub mysystem($)
}
}
#
# Life's a rich picnic. And all that.
1;
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