$NetBSD: patch-bin_spell,v 1.1 2025/11/30 06:24:16 scole Exp $

search for system dictionary

--- bin/spell.orig	2025-11-04 14:05:44.000000000 +0000
+++ bin/spell
@@ -16,11 +16,12 @@ use strict;
 
 use File::Basename qw(basename);
 use Getopt::Std qw(getopts);
+use PerlPowerTools;
 
 use constant EX_SUCCESS => 0;
 use constant EX_FAILURE => 1;
 
-use constant DICT_FILE => '/usr/dict/words';
+use constant DICT_FILE => get_dictionary_path('/usr/dict/words');
 
 my $Program = basename($0);
 
