X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FMooseX%2FTypes%2FCommon.pm;h=40a785166b1bd07d155c10e3919ba38693d3846b;hb=bf8650d89cb21d78cc6d3576e315367acd854fb4;hp=8bf97260f8550c31ece89085b8a4336738ec4d89;hpb=ac73ab52030a0e37e78c715d880d92cdb8f4b0ed;p=gitmo%2FMooseX-Types-Common.git diff --git a/lib/MooseX/Types/Common.pm b/lib/MooseX/Types/Common.pm index 8bf9726..40a7851 100644 --- a/lib/MooseX/Types/Common.pm +++ b/lib/MooseX/Types/Common.pm @@ -2,14 +2,23 @@ package MooseX::Types::Common; use strict; use warnings; +use Carp qw/cluck/; -our $VERSION = '0.001000'; +our $VERSION = '0.001008'; + +sub import { + my $package = shift; + return unless @_; + cluck("Tried to import the symbols " . join(', ', @_) + . " from MooseX::Types::Common.\nDid you mean " + . "MooseX::Types::Common::String or MooseX::Type::Common::Numeric?"); +} 1; =head1 NAME -MooseX::Types::Common +MooseX::Types::Common - A library of commonly used type constraints =head1 SYNOPSIS