diff options
| author | Daniel Friesel <derf@derf.homelinux.org> | 2008-06-14 12:09:33 +0200 |
|---|---|---|
| committer | Daniel Friesel <derf@derf.homelinux.org> | 2008-06-14 12:09:33 +0200 |
| commit | e7b60af17e46b48c55572d2e19d9e5d7037abe35 (patch) | |
| tree | 56ff2b93f15af9d20d842a8cd76f21404c57b966 /bin/removelinks | |
| parent | 40cb8faed5249bf2b9a0f2f163a6742ae8a6832e (diff) | |
bin/removelinks: oops. made it work
Diffstat (limited to 'bin/removelinks')
| -rwxr-xr-x | bin/removelinks | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/bin/removelinks b/bin/removelinks index c5e80c1..87d5c5f 100755 --- a/bin/removelinks +++ b/bin/removelinks @@ -15,9 +15,10 @@ closedir(BIN); foreach(@binaries) { next if $_ eq '.'; next if $_ eq '..'; + $_ = "$home/bin/$_"; next unless (-l); if ((split(/\//, readlink))[2] eq $package) { - unlink("$home/bin/$_"); + unlink; print "Removed $_\n" if $verbose; } } |