13 lines
520 B
Plaintext
13 lines
520 B
Plaintext
$OpenBSD: patch-tkispell,v 1.1.1.1 2006/10/29 17:42:53 ajacoutot Exp $
|
|
--- tkispell.orig Sat Oct 28 20:33:47 2006
|
|
+++ tkispell Sat Oct 28 20:34:14 2006
|
|
@@ -11,7 +11,7 @@ $VERSION=0.17;
|
|
my $fn = '*-helvetica-medium-r-*-*-12-*'; # Widget font
|
|
|
|
my $lang = $ENV{LANG};
|
|
-if ($lang =~ /^C$/ || ! defined ($lang)) {$lang = 'default'; }
|
|
+if (defined ($lang) && $lang =~ /^C$/ || ! defined ($lang)) {$lang = 'default'; }
|
|
my $hdict = $ENV{HOME}."/.ispell_$lang"; # Personal dictionary.
|
|
|
|
my $ispell_prog = `which ispell`;
|