X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=dh_strip;h=cfa26653341fc6900527b47640d96bf1867f7a93;hb=4769644604ccd4a49ca242e3461fffdc37927f1d;hp=2796f9afb1d91645ed9e43e88ab92141cc82f06b;hpb=b91c19fcf670df1b22a92b47e8ed2d435dfb7299;p=debhelper.git

diff --git a/dh_strip b/dh_strip
index 2796f9a..cfa2665 100755
--- a/dh_strip
+++ b/dh_strip
@@ -77,7 +77,9 @@ Debian policy, version 3.0.1
 
 =cut
 
-init();
+init(options => {
+	"keep-debug" => \$dh{K_FLAG},
+});
 
 # This variable can be used to turn off stripping (see Policy).
 if (defined $ENV{DEB_BUILD_OPTIONS} && $ENV{DEB_BUILD_OPTIONS} =~ /nostrip/) {
@@ -113,7 +115,8 @@ sub testfile {
 	return if $fn=~m/debug\/.*\.so/;
 
 	# Does its filename look like a shared library?
-	if (m/.*\.so.*?/) {
+	# (*.cmxs are OCaml native code shared libraries)
+	if (m/.*\.(so.*?|cmxs$)/) {
 		# Ok, do the expensive test.
 		my $type=get_file_type($_);
 		if ($type=~m/.*ELF.*shared.*/) {