Fixed a bug with rc file name and location.
This commit is contained in:
+1
-1
@@ -126,7 +126,7 @@ BEGIN {
|
|||||||
$rc = (defined($rc) && length($rc)) ? $rc : "";
|
$rc = (defined($rc) && length($rc)) ? $rc : "";
|
||||||
unless ($norc) {
|
unless ($norc) {
|
||||||
my $rcf =
|
my $rcf =
|
||||||
($rc =~ m#^/#) ? $rc : "$ENV{'HOME'}/.ttytterrc${rc}";
|
($rc =~ m#^/#) ? $rc : "$config/ttyverserc${rc}";
|
||||||
if (open(W, $rcf)) {
|
if (open(W, $rcf)) {
|
||||||
# 5.14 sets this lazily, so this gives us a way out
|
# 5.14 sets this lazily, so this gives us a way out
|
||||||
eval 'binmode(W, ":utf8")' unless ($seven);
|
eval 'binmode(W, ":utf8")' unless ($seven);
|
||||||
|
|||||||
Reference in New Issue
Block a user