From 724eb33c2a3fb121731f254c20af10107ef74086 Mon Sep 17 00:00:00 2001 From: Daniel Friesel Date: Mon, 31 Jan 2011 21:07:37 +0100 Subject: Remove hardcoded share path --- bin/vnet | 13 ++++++++++++- 1 file changed, 12 insertions(+), 1 deletion(-) diff --git a/bin/vnet b/bin/vnet index 7e78295..aa4f7c0 100755 --- a/bin/vnet +++ b/bin/vnet @@ -15,7 +15,7 @@ use LWP::Simple; my %opts; my $alpha; -my $share = "$ENV{HOME}/packages/visual/share"; +my $share = $0; my ($ext_ip, $int_ip); sub get_ext_ip { @@ -68,6 +68,17 @@ sub show_net_console { ); } +if (-l $share) { + my $link = readlink($share); + $share =~ s{ [^/]+ $ }{}x; + $link =~ s{ / bin / vnet $ }{}x; + $share .= "${link}/share"; +} +else { + $share =~ s{ / bin / vnet $ }{}x; + $share .= '/share'; +} + getopts('a:cfg', \%opts); $alpha = $opts{'a'} // 0; -- cgit v1.2.3