diff options
| -rw-r--r-- | ChangeLog | 4 | ||||
| -rwxr-xr-x | sbin/kdeDesktopCleanup | 11 |
2 files changed, 10 insertions, 5 deletions
@@ -1,3 +1,7 @@ +2000-05-09 Pixel <pixel@mandrakesoft.com> + + * sbin/kdeDesktopCleanup: added handling of URL kdelnk's + 2000-05-09 dam's <damien@mandrakesoft.com> * corrected Netscape and rpmdrake gnome icons diff --git a/sbin/kdeDesktopCleanup b/sbin/kdeDesktopCleanup index e92ea2c..1ff6ea0 100755 --- a/sbin/kdeDesktopCleanup +++ b/sbin/kdeDesktopCleanup @@ -8,14 +8,15 @@ foreach $f (map { grep { /\.kdelnk$/ } eval { all("$_/Desktop") } } @dirs) { open F, $f or next; L: foreach (<F>) { - $_ = "Exec=linuxconf" if $f =~ /linuxconf/i; # hack - - ($l) = /^Exec=(?:kdesu\s+-c\s+)?"?(\S+)/ or next; - -x "$_/$l" and last L foreach '', @path; + if (/^Exec=(?:kdesu\s+-c\s+)?"?(\S+)/) { + -x "$_/$1" and last L foreach '', @path; + } elsif (m|^URL=file:(/.*)|) { + -e $1 and last; + } else { next } print STDERR "removing $f\n"; unlink $f; last; - } + } } sub all { |