diff options
Diffstat (limited to 'UFileAssoc.pas')
| -rw-r--r-- | UFileAssoc.pas | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/UFileAssoc.pas b/UFileAssoc.pas index 2764df8..2c1f708 100644 --- a/UFileAssoc.pas +++ b/UFileAssoc.pas @@ -176,8 +176,8 @@ begin begin if not IsLnk then Icon := FileIconCached.FPixbuf else Icon := FileIconLnkCached.FPixbuf; - if (Pos('.', AName) > 1) and (LastDelimiter('.', AName) < Length(AName)) then begin - Ext := ANSIUpperCase(Trim(Copy(AName, LastDelimiter('.', AName) + 1, Length(AName) - LastDelimiter('.', AName)))); + if (Pos('.', FName) > 1) and (LastDelimiter('.', FName) < Length(FName)) then begin + Ext := WideUpperCase(Trim(Copy(FDisplayName, LastDelimiter('.', FDisplayName) + 1, Length(FDisplayName) - LastDelimiter('.', FDisplayName)))); // Try to find a plugin which can handle this archive type b := False; |