aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--ChangeLog4
-rwxr-xr-xsbin/kdeDesktopCleanup11
2 files changed, 10 insertions, 5 deletions
diff --git a/ChangeLog b/ChangeLog
index 3e26f25..80b2dc6 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -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 {