From 75847ab962eb08422be23aa382ef3486e4851729 Mon Sep 17 00:00:00 2001
From: Chmouel Boudjnah <chmouel@mandriva.org>
Date: Thu, 6 Apr 2000 02:19:16 +0000
Subject: When we find an orphan man pages, erase it (any better idea ?)

---
 compress_files | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

(limited to 'compress_files')

diff --git a/compress_files b/compress_files
index 2112765..a2ffc17 100755
--- a/compress_files
+++ b/compress_files
@@ -172,7 +172,7 @@ foreach (keys %hardlinks) {
 }
 
 # Fix up symlinks that were pointing to the uncompressed files.
-open (FIND,"find $RPM_BUILD_ROOT -type l |");
+open (FIND,"find usr/man -type l |");
 while (<FIND>) {
     chomp;
     ($directory)=m:(.*)/:;
@@ -180,7 +180,11 @@ while (<FIND>) {
     if (! -e "$directory/$linkval" && -e "$directory/$linkval.bz2") {
 	system("rm","-f",$_);
 	system("ln","-sf","$linkval.bz2","$_.bz2");
+    } elsif (! -e "$directory/$linkval" && ! -e "$directory/linkval.bz2" )  {
+	#Bad link go on nowhere (any better idea) ?
+	unlink("$_");
     }
+	
 }
 
 # compress_files ends here
-- 
cgit v1.2.1