"Fossies" - the Fresh Open Source Software archive

Member "kdirstat-2.4.4/kdirstat/fix_move_to_trash_bin.pl" of archive kdirstat-2.4.4.tar.gz:

#!/usr/bin/perl
#
# Replace ~/KDesktop/Trash to %t
#
while( <> )
{
    s:~?\S*/\S*Trash\S*:%t: if ( /^\s*command\s*=\s*kfmclient\s+move/ );
    print $_;
}