[Module-build-checkins] Module-Build/lib/Module/Build Base.pm,1.340.2.1,1.340.2.2
Status: Beta
Brought to you by:
kwilliams
From: Ken W. <kwi...@us...> - 2004-11-15 19:51:19
|
Update of /cvsroot/module-build/Module-Build/lib/Module/Build In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv11627/lib/Module/Build Modified Files: Tag: release-0_26_branch Base.pm Log Message: Eliminate undef-var warning on module_name Index: Base.pm =================================================================== RCS file: /cvsroot/module-build/Module-Build/lib/Module/Build/Base.pm,v retrieving revision 1.340.2.1 retrieving revision 1.340.2.2 diff -C2 -d -r1.340.2.1 -r1.340.2.2 *** Base.pm 13 Oct 2004 18:56:45 -0000 1.340.2.1 --- Base.pm 15 Nov 2004 19:51:10 -0000 1.340.2.2 *************** *** 83,86 **** --- 83,87 ---- config => {%Config, %$config}, properties => { + module_name => '', build_script => 'Build', base_dir => $package->cwd, *************** *** 538,543 **** return $p->{dist_version} if exists $p->{dist_version}; ! if (exists $p->{module_name}) { ! $p->{dist_version_from} ||= join( '/', 'lib', split '::', $p->{module_name} ) . '.pm'; } --- 539,544 ---- return $p->{dist_version} if exists $p->{dist_version}; ! if ($self->module_name) { ! $p->{dist_version_from} ||= join( '/', 'lib', split '::', $self->module_name ) . '.pm'; } |