From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Wed, 29 Nov 2000 16:36:33 +0000 (+0000)
Subject: All the core library users of Class::Struct seem to be
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=ee28235b3274e2a0a6e2b8de32573633563eef75;p=p5sagit%2Fp5-mst-13.2.git

All the core library users of Class::Struct seem to be
using "use Class::Struct 'struct';" instead of the bare
"use Class::Struct;", which isn't documented in Class::Struct.
This can't be right.

p4raw-id: //depot/perl@7925
---

diff --git a/lib/File/stat.pm b/lib/File/stat.pm
index be14fbc..0cf7a0b 100644
--- a/lib/File/stat.pm
+++ b/lib/File/stat.pm
@@ -20,7 +20,7 @@ use vars @EXPORT_OK;
 # Class::Struct forbids use of @ISA
 sub import { goto &Exporter::import }
 
-use Class::Struct;
+use Class::Struct qw(struct);
 struct 'File::stat' => [
      map { $_ => '$' } qw{
 	 dev ino mode nlink uid gid rdev size