do not install PVE::APLInfo

We need to rewrite that for final 2.0 release.

diff --git a/PVE/Makefile b/PVE/Makefile
index a9dfb358aed15a0f63f421e381e8250044125de1..3a6608407ce8eba54cf76f57c856fd63c610d59f 100644 (file)
--- a/PVE/Makefile
+++ b/PVE/Makefile
@@ -10,8 +10,7 @@ PERLSOURCE =                  \
        REST.pm                 \
        OpenVZ.pm               \
        OpenVZMigrate.pm        \
-       VZDump.pm               \
-       APLInfo.pm
+       VZDump.pm
 
 all: pvecfg.pm ${SUBDIRS}
 

diff --git a/bin/pveam b/bin/pveam
index 3a9c2fc58d85378df4090d114f807a2083138318..b85bb3a589b21dd48b502946829b9aa54810eb78 100755 (executable)
--- a/bin/pveam
+++ b/bin/pveam
@@ -1,8 +1,8 @@
 #!/usr/bin/perl -w
 
 use strict;
-use PVE::APLInfo;
-use PVE::Config;
+use PVE::Cluster;
+#use PVE::APLInfo;
 
 if (scalar (@ARGV) != 1) {
     print STDERR "usage: $0 CMD\n";
@@ -12,9 +12,10 @@ if (scalar (@ARGV) != 1) {
 my $cmd = shift;
 
 if ($cmd eq 'update') {
-    my $pvecfg = PVE::Config::read_file('pvecfg'); 
-    exit (0) if PVE::APLInfo::update($pvecfg->{http_proxy});
-    print STDERR "update failed - see /var/log/pveam.log for details\n";
+    my $dccfg = PVE::Cluster::cfs_read_file('datacenter.cfg');
+    die "sorry, this is currently not implemented\n";
+    #exit (0) if PVE::APLInfo::update($dccfg->{http_proxy});
+    #print STDERR "update failed - see /var/log/pveam.log for details\n";
     exit (-1);
 } else {
     print STDERR "unknown CMD '$cmd'\n";