X-Git-Url: http://git.annexia.org/?a=blobdiff_plain;f=perl%2Ft%2F010-load.t;h=e279b2a7257b20c71867381e56bbc2dd32f0bd84;hb=ae45cee728039d7724fc73e5ffb2550c8054d268;hp=4aeffb7f1c02dcbdae5f78d6eb17402a9c6e8563;hpb=9908e03e922b670437bcd89b6873f9ebc914567e;p=libguestfs.git

diff --git a/perl/t/010-load.t b/perl/t/010-load.t
index 4aeffb7..e279b2a 100644
--- a/perl/t/010-load.t
+++ b/perl/t/010-load.t
@@ -13,17 +13,12 @@
 #
 # 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., 675 Mass Ave, Cambridge, MA 02139, USA.
+# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
 
 use strict;
 use warnings;
-use Test::More;
-
-plan tests => 1;
+use Test::More tests => 1;
 
 BEGIN {
-    use_ok ("Sys::Guestfs") or die;
+    use_ok ("Sys::Guestfs");
 }
-
-my $h = Sys::Guestfs::create ();
-ok ($h);