#!/usr/bin/perl

# Copyright: MandrakeSoft, licensed under the GPL v2.
# modified by Laurent Montel <lmontel@mandrakesoft.com>

use strict;
use MDK::Common;

foreach my $file (@ARGV) {
    substInFile {
        if (/Extensions=(.*)$/) {
            my $result = $1;
			s!$!,find.desktop! if $result !~ m!find.desktop!;
        }
    } $file;
}