/[gentoo-x86]/eclass/perl-module.eclass
Gentoo

Diff of /eclass/perl-module.eclass

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

Revision 1.147 Revision 1.148
1# Copyright 1999-2014 Gentoo Foundation 1# Copyright 1999-2014 Gentoo Foundation
2# Distributed under the terms of the GNU General Public License v2 2# Distributed under the terms of the GNU General Public License v2
3# $Header: /var/cvsroot/gentoo-x86/eclass/perl-module.eclass,v 1.147 2014/11/09 18:10:24 dilfridge Exp $ 3# $Header: /var/cvsroot/gentoo-x86/eclass/perl-module.eclass,v 1.148 2014/11/09 21:34:29 dilfridge Exp $
4 4
5# @ECLASS: perl-module.eclass 5# @ECLASS: perl-module.eclass
6# @MAINTAINER: 6# @MAINTAINER:
7# perl@gentoo.org 7# perl@gentoo.org
8# @AUTHOR: 8# @AUTHOR:
303 perl_link_duallife_scripts 303 perl_link_duallife_scripts
304} 304}
305 305
306perlinfo() { 306perlinfo() {
307 debug-print-function $FUNCNAME "$@" 307 debug-print-function $FUNCNAME "$@"
308 eqawarn "perl-modules.eclass: perlinfo is deprecated and will be removed. Please use perl_set_version instead."
308 perl_set_version 309 perl_set_version
309} 310}
310 311
312# @FUNCTION: perl_set_version
313# @USAGE: perl_set_version
314# @DESCRIPTION:
315# Extract version information and installation paths from the current Perl
316# interpreter.
317#
318# This sets the following variables: PERL_VERSION, SITE_ARCH, SITE_LIB,
319# ARCH_LIB, VENDOR_LIB, VENDOR_ARCH
320#
321# This function used to be called perlinfo as well.
311perl_set_version() { 322perl_set_version() {
312 debug-print-function $FUNCNAME "$@" 323 debug-print-function $FUNCNAME "$@"
313 debug-print "$FUNCNAME: perlinfo_done=${perlinfo_done}" 324 debug-print "$FUNCNAME: perlinfo_done=${perlinfo_done}"
314 ${perlinfo_done} && return 0 325 ${perlinfo_done} && return 0
315 perlinfo_done=true 326 perlinfo_done=true
324 VENDOR_ARCH=${installvendorarch} 335 VENDOR_ARCH=${installvendorarch}
325} 336}
326 337
327fixlocalpod() { 338fixlocalpod() {
328 debug-print-function $FUNCNAME "$@" 339 debug-print-function $FUNCNAME "$@"
340 eqawarn "perl-modules.eclass: fixlocalpod is deprecated and will be removed. Please use perl_delete_localpod instead."
329 perl_delete_localpod 341 perl_delete_localpod
330} 342}
331 343
344# @FUNCTION: perl_delete_localpod
345# @USAGE: perl_delete_localpod
346# @DESCRIPTION:
347# Remove stray perllocal.pod files in the temporary install directory D.
348#
349# This function used to be called fixlocalpod as well.
332perl_delete_localpod() { 350perl_delete_localpod() {
333 debug-print-function $FUNCNAME "$@" 351 debug-print-function $FUNCNAME "$@"
334 352
335 find "${D}" -type f -name perllocal.pod -delete 353 find "${D}" -type f -name perllocal.pod -delete
336 find "${D}" -depth -mindepth 1 -type d -empty -delete 354 find "${D}" -depth -mindepth 1 -type d -empty -delete

Legend:
Removed from v.1.147  
changed lines
  Added in v.1.148

  ViewVC Help
Powered by ViewVC 1.1.20