Icon-Theme-Helper

 view release on metacpan or  search on metacpan

lib/Icon/Theme/Helper.pm  view on Meta::CPAN

			return $icon;
		}
	}
	if ($mimetype =~ /addressbook/) {
		$icon=$self->getIcon('MimeTypes', 'x-office-address-book');
		if (defined($icon)) {
			return $icon;
		}
	}

	#checks it for a calendar
	if ($mimetype =~ /calendar/) {
		$icon=$self->getIcon('MimeTypes', 'calendar');
		if (defined($icon)) {
			return $icon;
		}
	}
	if ($mimetype =~ /calendar/) {
		$icon=$self->getIcon('MimeTypes', 'stock_calendar');
		if (defined($icon)) {
			return $icon;
		}
	}
	if ($mimetype =~ /calendar/) {
		$icon=$self->getIcon('MimeTypes', 'x-office-calendar');
		if (defined($icon)) {
			return $icon;
		}
	}

	#try it for images
	if ($mimetype =~ /image/) {
		$icon=$self->getIcon('MimeTypes', 'image');
		if (defined($icon)) {
			return $icon;



( run in 0.271 second using v1.01-cache-2.11-cpan-5dc5da66d9d )