view Lib/IMPL.pm @ 175:9057e4b95d10

corrected cloning method
author sourcer
date Wed, 05 Oct 2011 00:48:43 +0300
parents 6ce1f052b90a
children d1676be8afcc
line wrap: on
line source

package IMPL;
use strict;

use IMPL::_core qw(setDebug);
use IMPL::_core::version;

sub import {
	my ($opts) = @_;
	
	if (ref $opts eq 'HASH') {
		setDebug($$opts{Debug}) if exists $$opts{Debug};
	}
}

1;