From bed9af405db67aff779cece9b72029b7b22b0c1e Mon Sep 17 00:00:00 2001
From: Tomas Bzatek <tbzatek@users.sourceforge.net>
Date: Sat, 24 Oct 2009 20:49:55 +0200
Subject: Icon and desktop file

Finally, an icon! Viewer uses different one though (from icon theme).
We install desktop file and icons by default now.

Artwork courtesy of Spajr Gvorcek
---
 UViewer.pas | 1 +
 1 file changed, 1 insertion(+)

(limited to 'UViewer.pas')

diff --git a/UViewer.pas b/UViewer.pas
index a6f5bc4..bb29bd1 100644
--- a/UViewer.pas
+++ b/UViewer.pas
@@ -79,6 +79,7 @@ begin
   Caption := 'TuxView';
   BorderWidth := 5;
   AThread := nil;
+  if @gtk_window_set_icon_name <> nil then gtk_window_set_icon_name(PGtkWindow(FWidget), 'text-x-generic');  // accessories-text-editor
 
   ScrolledWindow := TGTKScrolledWindow.Create(Self);
   ScrolledWindow.HorizScrollBarPolicy := sbAutomatic;
-- 
cgit v1.2.3