From 84c275b57198f8d11154d0c9d17b97faca3c800c Mon Sep 17 00:00:00 2001
From: joey <joey>
Date: Tue, 17 Aug 1999 05:07:21 +0000
Subject: [PATCH] r158: Initial Import

---
 debian/changelog | 6 ++++++
 dh_suidregister  | 2 +-
 2 files changed, 7 insertions(+), 1 deletion(-)

diff --git a/debian/changelog b/debian/changelog
index 5cdf2f4..2a15b97 100644
--- a/debian/changelog
+++ b/debian/changelog
@@ -1,3 +1,9 @@
+debhelper (1.2.22) unstable; urgency=low
+
+  * Reversed change in last version; don't clobber mode (#31628).
+
+ -- Joey Hess <joeyh@master.debian.org>  Fri,  8 Jan 1999 15:01:25 -0800
+
 debhelper (1.2.21) unstable; urgency=low
 
   * dh_installdocs: Added doc-base support, if debian/<package>.doc-base
diff --git a/dh_suidregister b/dh_suidregister
index 951984f..d5b10eb 100755
--- a/dh_suidregister
+++ b/dh_suidregister
@@ -52,7 +52,7 @@ foreach $PACKAGE (@{$dh{DOPACKAGES}}) {
 		$group=getgrgid($gid);
 		# Note that I have to print mode in ocal, stripping file type.
 		$sedstr=sprintf("s:#FILE#:$file:;s/#PACKAGE#/$PACKAGE/;s/#OWNER#/$user/;s/#GROUP#/$group/;s/#PERMS#/%#o/",
-			        $mode & 00777);
+			        $mode & 07777);
 
 		autoscript($PACKAGE,"postinst","postinst-suid",$sedstr);
 		autoscript($PACKAGE,"postrm","postrm-suid","$sedstr");
-- 
2.39.5