Magellan Linux

Diff of /trunk/include/cpan.sminc

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

revision 22057 by niro, Tue Jul 1 08:34:47 2014 UTC revision 22058 by niro, Thu Aug 21 15:32:38 2014 UTC
# Line 8  sminclude perl Line 8  sminclude perl
8  #   ${CPAN_AUTHOR}:   needed, author of the CPAN-module  #   ${CPAN_AUTHOR}:   needed, author of the CPAN-module
9  [[ -z ${CPAN_AUTHOR} ]] && die "cpan.sminc: \$CPAN_AUTHOR not given!"  [[ -z ${CPAN_AUTHOR} ]] && die "cpan.sminc: \$CPAN_AUTHOR not given!"
10    
11  CPAN_AUTHOR_UPPER="${CPAN_AUTHOR^^}"  if [[ ${BASH_VERSINFO[0]} -le 3 ]]
12  CPAN_AUTHOR_LOWER="${CPAN_AUTHOR,,}"  then
13     CPAN_AUTHOR_UPPER=$(echo ${CPAN_AUTHOR} | tr '[a-z]' '[A-Z]')
14     CPAN_AUTHOR_LOWER=$(echo ${CPAN_AUTHOR} | tr '[A-Z]' '[a-z]')
15    else
16     CPAN_AUTHOR_UPPER="${CPAN_AUTHOR^^}"
17     CPAN_AUTHOR_LOWER="${CPAN_AUTHOR,,}"
18    fi
19    
20  : ${CPAN_MODULE="${PNAME}"}  : ${CPAN_MODULE="${PNAME}"}
21    

Legend:
Removed from v.22057  
changed lines
  Added in v.22058