r348: * Fixes for perl 5.6.

   * Spelling fixes.

1 files changed, 5 insertions, 5 deletions

diff --git a/dh_clean b/dh_clean
index 1f73bea7..1ca10125 100755
--- a/dh_clean
+++ b/dh_clean
@@ -11,11 +11,11 @@ foreach $PACKAGE (@{$dh{DOPACKAGES}}) {
 	$EXT=pkgext($PACKAGE);
 
 	if (! $dh{D_FLAG}) {
-		doit("rm","-f","debian/$EXT\substvars",
-			"debian/$EXT\postinst.debhelper",
-			"debian/$EXT\postrm.debhelper",
-			"debian/$EXT\preinst.debhelper",
-			"debian/$EXT\prerm.debhelper");
+		doit("rm","-f","debian/${EXT}substvars",
+			"debian/${EXT}postinst.debhelper",
+			"debian/${EXT}postrm.debhelper",
+			"debian/${EXT}preinst.debhelper",
+			"debian/${EXT}prerm.debhelper");
 	}
 	
 	doit ("rm","-rf",$TMP);