[BACK]Return to makeeditors.pl CVS log [TXT] [DIR] Up to [Local Repository] / db / prgsrc

Diff for /db/prgsrc/makeeditors.pl between versions 1.3 and 1.4

version 1.3, 2010/04/24 21:52:16 version 1.4, 2010/05/15 15:46:15
Line 51  while (<NICKS>) Line 51  while (<NICKS>)
    ($number,$nick)=split;        ($number,$nick)=split;   
    next unless $number;        next unless $number;   
    next unless $number=~/^\d+$/;     next unless $number=~/^\d+$/;
    ($name,$surname)=split ' ',<NICKS>;     @parts = split ' ',<NICKS>;
    $name{$nick}= ucfirst lc $name;     $_ = ucfirst lc $_ foreach  @parts;
    $surname=ucfirst lc $surname;     $surname = pop @parts;
      $name{$nick}= join ' ', @parts;
    $surname=~s/\-(.)/"-". uc $1/ge;     $surname=~s/\-(.)/"-". uc $1/ge;
    $surname=~s/\'(.)/"'". uc $1/ge;     $surname=~s/\'(.)/"'". uc $1/ge;
    $surname{$nick}= $surname;     $surname{$nick}= $surname;
Removed from v.1.3  
changed lines
  Added in v.1.4

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>