From 980194b399beed9bef5ebbe81f77a9f16171bcee Mon Sep 17 00:00:00 2001
From: Anssi Hannula <anssi@mageia.org>
Date: Fri, 16 Mar 2012 17:24:16 +0000
Subject: clean_perl: use -empty instead of silencing failing directory
 deletion attempts

---
 NEWS       | 3 +++
 clean_perl | 2 +-
 2 files changed, 4 insertions(+), 1 deletion(-)

diff --git a/NEWS b/NEWS
index 1728a9f..09b5cbd 100644
--- a/NEWS
+++ b/NEWS
@@ -1,3 +1,6 @@
+    * clean_perl: use -empty instead of silencing failing directory deletion
+      attempts
+
 2012-03-05 D Morgan <dmorgan@mageia.org> 0.31.6
     * prevent waiting for non existing files if files contains space or dash
 
diff --git a/clean_perl b/clean_perl
index eca5b63..11b0417 100755
--- a/clean_perl
+++ b/clean_perl
@@ -17,4 +17,4 @@ for i in $(find $d -name "*.bs"); do
     fi
 done
 
-find $d -depth -type d -exec rmdir {} 2>/dev/null \;
+find $d -depth -type d -empty -exec rmdir {} \;
-- 
cgit v1.2.1