diff --git a/ChangeLog b/ChangeLog
index 455648076345822bf13c55744bad295f73cf458f..36b387fe58cea61932b3b5d6ee17fae723ffffed 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -157,6 +157,7 @@ Changes
 	  either be improved or removed.  I chose improved].
 	- Change all child error checks to use one goto (gasp!) called 
 	  close_pipes_and_exit, so we don't leak FDs.
+	- Fix FD leaks which occur outside of errors (David Benbennick).
   do_int_speller(), do_alt_speller()
 	- Programs now return char *, NULL for successful completion,
 	  otherwise the error string to display.  This allows us to give
diff --git a/nano.c b/nano.c
index 35e7af4f5f40da31ddb9369fbf4bddd6d5b924c3..e20378f2875101fd8d6f51ae5fb6ce0fab5dfa86 100644
--- a/nano.c
+++ b/nano.c
@@ -1766,6 +1766,7 @@ char *do_int_speller(char *tempfile_name)
 	exit(1);
     }
 
+    close(spell_fd[0]);
     close(sort_fd[1]);
 
     /* A new process to run uniq in */
@@ -1791,6 +1792,7 @@ char *do_int_speller(char *tempfile_name)
 	exit(1);
     }
 
+    close(sort_fd[0]);
     close(uniq_fd[1]);
 
     /* Child process was not forked successfully */