X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=dh_suidregister;h=b82bc7d229c2113fd0285b424f75b1777230306e;hb=f2cb401a50f9f0dbc84195867c6f371b59333ad6;hp=b7b3152fc1842fa0a9837429031fb1d5c4235047;hpb=cb5f6ab45790a7131bfbdb46f257dcb5b1fb5c2c;p=debhelper.git

diff --git a/dh_suidregister b/dh_suidregister
index b7b3152..b82bc7d 100755
--- a/dh_suidregister
+++ b/dh_suidregister
@@ -39,6 +39,7 @@ foreach $PACKAGE (@{$dh{DOPACKAGES}}) {
 		$tostrip="/";
 	}
 
+	# Register files with suidregister.
 	foreach $file (@files) {
 		# Strip leading $tostrip from $file.
 		$file=~s/^$tostrip//;
@@ -68,7 +69,12 @@ foreach $PACKAGE (@{$dh{DOPACKAGES}}) {
 
 		autoscript($PACKAGE,"postinst","postinst-suid",$sedstr);
 		autoscript($PACKAGE,"postrm","postrm-suid","$sedstr");
-		
+	}
+
+	# Remove suid bits from files. This is delayed to this point, because
+	# of a situation with hard linked files if it is done earlier.
+	# See changelog for 2.0.77.
+	foreach $file (@files) {
 		if ( -e "$TMP/$file") {
 			doit("chmod","a-s","$TMP/$file");
 		}