*** 1.30 1993/05/14 19:36:57 --- post_faq.pl.base 1993/06/17 12:04:09 *************** *** 1,10 **** #!#perl# # ! # Copy the file post_faq.mit to post_faq.dat, and edit it for local conditions, ! # especially where to find perl. # - # $Id: post_faq.pl.base,v 1.30 1993/05/14 19:36:57 jik Exp $ - # # Copyright (c) 1991 Jonathan I. Kamens. See the GNU Public License # (any version) for terms of distribution. --- 1,7 ---- #!#perl# # ! # $Id: post_faq.pl.base,v 1.32 1993/06/17 12:04:08 jik Exp $ # # Copyright (c) 1991 Jonathan I. Kamens. See the GNU Public License # (any version) for terms of distribution. *************** *** 277,283 **** } close(CONFIG); ! close(CONFIGOUT); sub message_id { # Takes three arguments -- an ID name, a time, and a host name -- --- 274,280 ---- } close(CONFIG); ! close(CONFIGOUT) || die "Closing $configout: $!.\n"; sub message_id { # Takes three arguments -- an ID name, a time, and a host name -- *** 1.6 1993/05/14 19:37:27 --- PATCHLEVEL 1993/06/17 12:04:22 *************** *** 1 **** ! 6 --- 1 ---- ! 7