check $SPELL for an alternative spell checker if we didn't get one from

the command line and/or rcfile, as Pico does


git-svn-id: svn://svn.savannah.gnu.org/nano/trunk/nano@1776 35c25a1d-7b9e-4130-9fde-d3aeb78583b8

ChangeLog

@@ -208,6 +208,8 @@ CVS code -
 	  after the terminal is properly set up, so that we can restore
 	  it easily after a resize. (DLR)
 	- Add missing cast to char when calling do_char(). (DLR)
+	- Check $SPELL for an alternative spell checker if we didn't get
+	  one from the command line and/or rcfile, as Pico does. (DLR)
 - nano.h:
 	- Since REGEXP_COMPILED is only used in search.c, convert it
 	  from a flag to a static int there. (DLR)

src/nano.c

@@ -3387,6 +3387,17 @@ int main(int argc, char *argv[])
 #endif
 #endif /* !DISABLE_JUSTIFY */
 
+#ifndef DISABLE_SPELLER
+    /* If we don't have an alternative spell checker after reading the
+     * command line and/or rcfile, check $SPELL for one, as Pico
+     * does. */
+    if (alt_speller == NULL) {
+	char *spellenv = getenv("SPELL");
+	if (spellenv != NULL)
+	    alt_speller = mallocstrcpy(NULL, spellenv);
+    }
+#endif
+
     if (tabsize == -1)
 	tabsize = 8;