perl: Remove Sys::Guestfs::Lib.

See announcement on the mailing list for more details about this change:

https://www.redhat.com/archives/libguestfs/2013-April/msg00001.html

generator/perl.ml

@@ -695,10 +695,6 @@ LVs, what filesystem is in each LV, etc.).  It can also run commands
 in the context of the guest.  Also you can access filesystems over
 FUSE.
 
-See also L<Sys::Guestfs::Lib(3)> for a set of useful library
-functions for using libguestfs from Perl, including integration
-with libvirt.
-
 =head1 ERRORS
 
 All errors turn into calls to C<croak> (see L<Carp(3)>).
@@ -1076,8 +1072,7 @@ Please see the file COPYING.LIB for the full license.
 
 L<guestfs(3)>,
 L<guestfish(1)>,
-L<http://libguestfs.org>,
-L<Sys::Guestfs::Lib(3)>.
+L<http://libguestfs.org>.
 
 =cut
 " copyright_years

perl/Makefile.am

@@ -28,7 +28,6 @@ EXTRA_DIST = \
 	examples/README \
 	examples/LICENSE \
 	examples/*.pl \
-	lib/Sys/Guestfs/Lib.pm \
 	run-bindtests \
 	run-perl-tests \
 	t/*.t \

perl/README

@@ -7,14 +7,3 @@ The basic libguestfs bindings have the name 'Sys::Guestfs'.
 
 As with all other language bindings, these bindings are generated
 automatically.  See generator/ directory.
-
-Sys::Guestfs::Lib
------------------
-
-Because we use Perl for writing lots of additional tools around
-libguestfs, the Perl bindings also contain an extra library of useful
-functions, called 'Sys::Guestfs::Lib'.  This extra library is entirely
-optional, and only enhances the usefulness of the ordinary libguestfs
-API.
-
-One of the features of this library is tighter libvirt integration.

perl/t/500-lib-load.t

@@ -1,37 +0,0 @@
-# libguestfs Perl bindings -*- perl -*-
-# Copyright (C) 2009 Red Hat Inc.
-#
-# This program is free software; you can redistribute it and/or modify
-# it under the terms of the GNU General Public License as published by
-# the Free Software Foundation; either version 2 of the License, or
-# (at your option) any later version.
-#
-# This program is distributed in the hope that it will be useful,
-# but WITHOUT ANY WARRANTY; without even the implied warranty of
-# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-# GNU General Public License for more details.
-#
-# You should have received a copy of the GNU General Public License
-# along with this program; if not, write to the Free Software
-# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
-
-use strict;
-use warnings;
-
-BEGIN {
-    use Test::More;
-
-    eval "use Locale::TextDomain";;
-    if (exists $INC{"Locale/TextDomain.pm"}) {
-        plan tests => 1;
-    } else {
-        plan skip_all => "no perl-libintl module";
-        exit 0;
-    }
-}
-
-use Sys::Guestfs;
-use Sys::Guestfs::Lib;
-
-# Just check Lib can be loaded.
-ok (1);

po/POTFILES

@@ -217,7 +217,6 @@ ocaml/guestfs-c.c
 perl/Guestfs.c
 perl/bindtests.pl
 perl/lib/Sys/Guestfs.pm
-perl/lib/Sys/Guestfs/Lib.pm
 php/extension/guestfs_php.c
 python/guestfs-py-byhand.c
 python/guestfs-py.c

src/guestfs.pod

@@ -760,11 +760,7 @@ in L</guestfs_add_drive_opts>.
 =head2 INSPECTION
 
 Libguestfs has APIs for inspecting an unknown disk image to find out
-if it contains operating systems, an install CD or a live CD.  (These
-APIs used to be in a separate Perl-only library called
-L<Sys::Guestfs::Lib(3)> but since version 1.5.3 the most frequently
-used part of this library has been rewritten in C and moved into the
-core code).
+if it contains operating systems, an install CD or a live CD.
 
 Add all disks belonging to the unknown virtual machine and call
 L</guestfs_launch> in the usual way.

tools/virt-list-filesystems

@@ -208,7 +208,6 @@ L<virt-tar(1)>,
 L<virt-filesystems(1)>,
 L<virt-list-partitions(1)>,
 L<Sys::Guestfs(3)>,
-L<Sys::Guestfs::Lib(3)>,
 L<Sys::Virt(3)>,
 L<http://libguestfs.org/>.
 

tools/virt-list-partitions

@@ -277,7 +277,6 @@ L<virt-filesystems(1)>,
 L<virt-list-filesystems(1)>,
 L<virt-resize(1)>,
 L<Sys::Guestfs(3)>,
-L<Sys::Guestfs::Lib(3)>,
 L<Sys::Virt(3)>,
 L<http://libguestfs.org/>.
 

tools/virt-tar

@@ -309,7 +309,6 @@ L<virt-copy-out(1)>,
 L<virt-tar-in(1)>,
 L<virt-tar-out(1)>,
 L<Sys::Guestfs(3)>,
-L<Sys::Guestfs::Lib(3)>,
 L<Sys::Virt(3)>,
 L<http://libguestfs.org/>.
 

tools/virt-win-reg

@@ -767,7 +767,6 @@ L<guestfs(3)>,
 L<guestfish(1)>,
 L<virt-cat(1)>,
 L<Sys::Guestfs(3)>,
-L<Sys::Guestfs::Lib(3)>,
 L<Win::Hivex(3)>,
 L<Win::Hivex::Regedit(3)>,
 L<Sys::Virt(3)>,