qm mtunnel: add tunnel version

to allow detection of supported features/commands for these
and future mtunnel changes.

Signed-off-by: Fabian Grünbichler <f.gruenbichler@proxmox.com>

diff --git a/PVE/CLI/qm.pm b/PVE/CLI/qm.pm
index e1921531c39420ef25a77d22457e136d678f273e..07e3b2ef38f6567dab6c6c813fc64bcf477eefaa 100755 (executable)
--- a/PVE/CLI/qm.pm
+++ b/PVE/CLI/qm.pm
@@ -268,6 +268,9 @@ __PACKAGE__->register_method ({
        print "tunnel online\n";
        *STDOUT->flush();
 
+       print "ver 1\n";
+       *STDOUT->flush();
+
        while (my $line = <>) {
            chomp $line;
            last if $line =~ m/^quit$/;