From 7b11fb16ec82236cb47f7c38fb05b7a915294575 Mon Sep 17 00:00:00 2001
From: "Richard W.M. Jones" <rjones@redhat.com>
Date: Thu, 25 Feb 2016 08:48:50 +0000
Subject: [PATCH] perl: Don't embed API number in Sys::Guestfs.

It means you have to rerun `make -C perl clean ; make' every time you
add an API, and is useless anyway.
---
 generator/perl.ml | 11 ++++++-----
 1 file changed, 6 insertions(+), 5 deletions(-)

diff --git a/generator/perl.ml b/generator/perl.ml
index 5250ce124..f11477bf0 100644
--- a/generator/perl.ml
+++ b/generator/perl.ml
@@ -722,16 +722,17 @@ package Sys::Guestfs;
 use strict;
 use warnings;
 
-# This version number changes whenever a new function
-# is added to the libguestfs API.  It is not directly
-# related to the libguestfs version number.
+# This is always 1.0, never changes, and is unrelated to the
+# real libguestfs version.  If you want to find the libguestfs
+# library version, use $g->version.  If you want to test if
+# APIs/parameters are present, use %%guestfs_introspection.
 use vars qw($VERSION);
-$VERSION = '0.%d';
+$VERSION = '1.0';
 
 require XSLoader;
 XSLoader::load ('Sys::Guestfs');
 
-" max_proc_nr;
+";
 
   (* Methods. *)
   pr "\