===================================================================
RCS file: /cvsrepo/anoncvs/cvs/src/usr.bin/mandoc/read.c,v
retrieving revision 1.120
retrieving revision 1.121
diff -c -r1.120 -r1.121
*** src/usr.bin/mandoc/read.c	2015/10/30 19:03:36	1.120
--- src/usr.bin/mandoc/read.c	2016/01/08 02:13:35	1.121
***************
*** 1,4 ****
! /*	$OpenBSD: read.c,v 1.120 2015/10/30 19:03:36 schwarze Exp $ */
  /*
   * Copyright (c) 2008, 2009, 2010, 2011 Kristaps Dzonsons <kristaps@bsd.lv>
   * Copyright (c) 2010-2015 Ingo Schwarze <schwarze@openbsd.org>
--- 1,4 ----
! /*	$OpenBSD: read.c,v 1.121 2016/01/08 02:13:35 schwarze Exp $ */
  /*
   * Copyright (c) 2008, 2009, 2010, 2011 Kristaps Dzonsons <kristaps@bsd.lv>
   * Copyright (c) 2010-2015 Ingo Schwarze <schwarze@openbsd.org>
***************
*** 535,540 ****
--- 535,541 ----
  			if (mparse_open(curp, &fd, ln.buf + of) ==
  			    MANDOCLEVEL_OK) {
  				mparse_readfd(curp, fd, ln.buf + of);
+ 				close(fd);
  				curp->file = save_file;
  			} else {
  				curp->file = save_file;
***************
*** 748,757 ****
  		else
  			free(blk.buf);
  	}
- 
- 	if (fd != STDIN_FILENO && close(fd) == -1)
- 		perror(file);
- 
  	return curp->file_status;
  }
  
--- 749,754 ----