From 97858dbddbc3137cd512b3a0178aac73e04bba46 Mon Sep 17 00:00:00 2001 From: Don Armstrong Date: Tue, 16 Jun 2009 22:47:09 +0000 Subject: [PATCH] * update the update_lists command --- update_lists | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/update_lists b/update_lists index d23aa24..a2ffaf2 100755 --- a/update_lists +++ b/update_lists @@ -2,9 +2,9 @@ cd ~/Maildir # Build lists sublists -find lists -maxdepth 1 -mindepth 1 -type d |perl -ne 'chomp; $a = $_; $b = $a; $b =~ s/\//./g; qx(ln -sf $a .$b)' +find lists -maxdepth 1 -mindepth 1 -type d |perl -ne 'chomp; $a = $_; $b = $a; $b =~ s/\./_/g; $b =~ s/\//./g; qx(ln -sf $a .$b)' # Build bugs sublists -find bugs -maxdepth 1 -mindepth 1 -type d |perl -ne 'chomp; $a = $_; $b = $a; $b =~ s/\//./g; qx(ln -sf $a .$b)' +find bugs -maxdepth 1 -mindepth 1 -type d |perl -ne 'chomp; $a = $_; $b = $a; $b =~ s/\./_/g; $b =~ s/\//./g; qx(ln -sf $a .$b)' # Remove dead lists #find ~/Maildir/lists/ -type d -maxdepth 1 -mindepth 1|xargs -n 1 -i sh -c '(( $(find "{}" -type f -iname "*" |wc -l) <= 1 )) && rm -rf "{}"' -- 2.39.5