r193: Initial Import

3 files changed, 33 insertions, 4 deletions

diff --git a/debian/changelog b/debian/changelog
index fd8190fb..3a50778c 100644
--- a/debian/changelog
+++ b/debian/changelog
@@ -1,3 +1,11 @@
+debhelper (1.2.54) unstable; urgency=low
+
+  * dh_installinit.1: man page fixups (#34160).
+  * *.1: the date of each man page is now automatically updated when 
+    debhelper is built to be the last modification time of the man page.
+
+ -- Joey Hess <joeyh@master.debian.org>  Thu,  8 Apr 1999 20:28:00 -0700
+
 debhelper (1.2.53) unstable; urgency=low
 
   * dh_compress: leave .taz and .tgz files alone. Previously trying to
diff --git a/debian/rules b/debian/rules
index 1c8c3b93..5995460f 100755
--- a/debian/rules
+++ b/debian/rules
@@ -41,6 +41,21 @@ binary-indep: build
 	./dh_installexamples examples/*
 	./dh_installmenu
 	./dh_installmanpages
+	# Fix up all man pages, filling in the modification time for them.
+	# Note this runs beofre the command below so debhelper.1 gets the right
+	# date on it.
+	perl -mPOSIX -e ' \
+		foreach $$f (@ARGV) { \
+		@data=stat($$f); \
+		$$date=POSIX::strftime("%d %B %Y",localtime($$data[9])); \
+		open (IN,$$f); \
+		@lines=<IN>; \
+		close IN; \
+		$$lines[0]=~s/1 ""/1 "$$date"/; \
+		open (OUT,">$$f"); \
+		print OUT @lines; \
+		close OUT; \
+	}' debian/tmp/usr/man/man1/*.1
 	# Fix up the debhelper.1 man page, substituting in a list of all
 	# debhelper commands. eek!
 	perl -ne ' \
@@ -48,13 +63,14 @@ binary-indep: build
 		$$collect.=".TP\n.BR $$_" if $$. eq 3 && /^dh_/; \
 		close(ARGV) if eof; \
 		END { \
-			open(I,"debhelper.1"); \
+			open(I,"debian/tmp/usr/man/man1/debhelper.1"); \
+			@lines=<I>; \
+			close I; \
 			open(O,">debian/tmp/usr/man/man1/debhelper.1"); \
-			while (<I>) { \
+			foreach (@lines) { \
 				s/#LIST#/$$collect/; \
 				print O; \
 			} \
-			close I; \
 			close O; \
 		}' *.1
 	./dh_installchangelogs
diff --git a/dh_md5sums b/dh_md5sums
index 76b87e82..2b626292 100755
--- a/dh_md5sums
+++ b/dh_md5sums
@@ -27,7 +27,12 @@ foreach $PACKAGE (@{$dh{DOPACKAGES}}) {
 		}
 		close CONFF;
 	}
-
+	
+	# See if we should exclude other files.
+	if (defined($dh{EXCLUDE_FIND}) && $dh{EXCLUDE_FIND} ne '') {
+		$exclude.="! \\( $dh{EXCLUDE_FIND} \\) ";
+	}
+	
 	$olddir=getcwd();
 	complex_doit("cd $TMP ; find * -type f $exclude ! -regex '^DEBIAN/.*' -print0 | xargs -r0 md5sum > DEBIAN/md5sums ; cd $olddir");
 	# If the file's empty, no reason to waste inodes on it.