[Gambas-user] [Gambas Bug Tracker] Bug #925: Desktopmime.fromfile().geticon does not identify executables

[bugtracker at ...3416...]

http://gambaswiki.org/bugtracker/edit?object=BUG.925&from=L21haW4-

Comment #1 by Antonio OREFICE:

Some typos...

Private pic As New PictureBox(fmain)

Public Sub Form_Open()
  Debug DesktopMime.FromFile("/usr/bin/ls").Pattern '<--this writes "txt"
  pic.picture = DesktopMime.FromFile("/usr/bin/ls").GetIcon(128).Picture
  Debug DesktopMime.FromFile("/usr/bin/pacman").pattern '<-- this writes "txt"
  pic.Move(0, 0, 200, 200)
End