Group :: Development/Perl
RPM: perl-Text-English
Main Changelog Spec Patches Sources Download Gear Bugs and FR Repocop
Patch: perl-Text-English-1.302-alt-home-idir.patch
Download
Download
--- perlindex-1.302/perlindex.PL~ 2004-05-02 13:46:21 +0000
+++ perlindex-1.302/perlindex.PL 2004-05-21 20:53:09 +0000
@@ -161,6 +161,9 @@ $opt_cbreak = 1;
if (defined $opt_idir) {
$IDIR = $opt_idir; # avoid to many changes below.
+} elsif (! -w $IDIR) {
+ $IDIR = "$ENV{HOME}/.perlindex";
+ mkdir $IDIR;
}
if (defined $opt_dict) {