[svn:perlfaq] r3684 - in perlfaq/trunk: . bin templates

[email protected] Wed, 15 Mar 2006 21:59:24 -0800 (PST)
Newsgroups perl.cvs.perlfaq
Message-ID <[email protected]>
Author: comdog
Date: Wed Mar 15 21:59:24 2006
New Revision: 3684

Added:
   perlfaq/trunk/bin/touch   (contents, props changed)
Modified:
   perlfaq/trunk/Makefile
   perlfaq/trunk/templates/usenet_post.txt

Log:
* made my own touch script because the command line version seems
to give all the split files slightly different times. Since my
random FAQ picking looks at the access time, I want everything to
start at exactly the same place.



Modified: perlfaq/trunk/Makefile
==============================================================================
--- perlfaq/trunk/Makefile	(original)
+++ perlfaq/trunk/Makefile	Wed Mar 15 21:59:24 2006
@@ -30,16 +30,16 @@
 	@ touch $@
 
 split:
-	${CVS} update -d
+#	${CVS} update -d
 	${PERL} bin/splitfaq ${SPLIT_DIR} ${FILES}
 	rm -f ${SPLIT_DIR}/perlfaq.00.00.txt
-	touch ${SPLIT_DIR}/*
+	bin/touch ${SPLIT_DIR}/*
 	
 splitquiet:
 	@ ${CVS} update -d
 	@ ${PERL} bin/splitfaq -q ${SPLIT_DIR} ${FILES}
 	@ rm -f ${SPLIT_DIR}/perlfaq.00.00.txt
-	@ touch ${SPLIT_DIR}/*  
+	@ bin/touch ${SPLIT_DIR}/*  
 
 test:
 	${PERL} t/pod.t

Added: perlfaq/trunk/bin/touch
==============================================================================
--- (empty file)
+++ perlfaq/trunk/bin/touch	Wed Mar 15 21:59:24 2006
@@ -0,0 +1,6 @@
+#!/usr/bin/perl
+
+# Ensure that every file  gets the same time
+$time = time;
+
+utime $time, $time, @ARGV;

Modified: perlfaq/trunk/templates/usenet_post.txt
==============================================================================
--- perlfaq/trunk/templates/usenet_post.txt	(original)
+++ perlfaq/trunk/templates/usenet_post.txt	Wed Mar 15 21:59:24 2006
@@ -20,5 +20,5 @@
 corrections to examples that do not work on particular platforms.
 Working code is greatly appreciated.
 
-If you'd like to help maintain the perlfaq, see the details in
+If you'd like to help maintain the perlfaq, see the details in 
 perlfaq.pod.