From 765977d0feaf97e99acf9b4f0439f3d5ed6c1b5b Mon Sep 17 00:00:00 2001 From: Olivier Blin Date: Mon, 18 Jul 2005 10:26:42 +0000 Subject: use eq --- userdrake | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'userdrake') diff --git a/userdrake b/userdrake index 0e4e290..818e152 100755 --- a/userdrake +++ b/userdrake @@ -258,7 +258,7 @@ sub GetFaceIcon { }; if (-e $user_icon) { my $current_md5 = common::md5file($user_icon); - eval { $i = find_index { common::md5file(any::face2png($_)) =~ /$current_md5/ } @icones }; + eval { $i = find_index { common::md5file(any::face2png($_)) eq $current_md5 } @icones }; if (!$@) { #- current icon found in @icones, select it $current_icon = $icones[$i]; } else { #- add and select current icon in @icones -- cgit v1.2.1