icon, linux, try to extract in system icon dir

lazproj/coedit.lpi

@@ -163,7 +163,6 @@
       <Unit5>
         <Filename Value="..\src\ce_dlang.pas"/>
         <IsPartOfProject Value="True"/>
-        <UnitName Value="ce_dlang"/>
       </Unit5>
       <Unit6>
         <Filename Value="..\src\ce_dlangutils.pas"/>
@@ -176,7 +175,6 @@
       <Unit8>
         <Filename Value="..\src\ce_dockoptions.pas"/>
         <IsPartOfProject Value="True"/>
-        <UnitName Value="ce_dockoptions"/>
       </Unit8>
       <Unit9>
         <Filename Value="..\src\ce_editor.pas"/>
@@ -184,12 +182,10 @@
         <ComponentName Value="CEEditorWidget"/>
         <HasResources Value="True"/>
         <ResourceBaseClass Value="Form"/>
-        <UnitName Value="ce_editor"/>
       </Unit9>
       <Unit10>
         <Filename Value="..\src\ce_editoroptions.pas"/>
         <IsPartOfProject Value="True"/>
-        <UnitName Value="ce_editoroptions"/>
       </Unit10>
       <Unit11>
         <Filename Value="..\src\ce_inspectors.pas"/>
@@ -198,7 +194,6 @@
       <Unit12>
         <Filename Value="..\src\ce_interfaces.pas"/>
         <IsPartOfProject Value="True"/>
-        <UnitName Value="ce_interfaces"/>
       </Unit12>
       <Unit13>
         <Filename Value="..\src\ce_libman.pas"/>
@@ -225,7 +220,6 @@
         <ComponentName Value="CEMessagesWidget"/>
         <HasResources Value="True"/>
         <ResourceBaseClass Value="Form"/>
-        <UnitName Value="ce_messages"/>
       </Unit16>
       <Unit17>
         <Filename Value="..\src\ce_miniexplorer.pas"/>
@@ -233,6 +227,7 @@
         <ComponentName Value="CEMiniExplorerWidget"/>
         <HasResources Value="True"/>
         <ResourceBaseClass Value="Form"/>
+        <UnitName Value="ce_miniexplorer"/>
       </Unit17>
       <Unit18>
         <Filename Value="..\src\ce_mru.pas"/>
@@ -248,7 +243,6 @@
         <ComponentName Value="CEOptionEditorWidget"/>
         <HasResources Value="True"/>
         <ResourceBaseClass Value="Form"/>
-        <UnitName Value="ce_optionseditor"/>
       </Unit20>
       <Unit21>
         <Filename Value="..\src\ce_procinput.pas"/>
@@ -256,7 +250,6 @@
         <ComponentName Value="CEProcInputWidget"/>
         <HasResources Value="True"/>
         <ResourceBaseClass Value="Form"/>
-        <UnitName Value="ce_procinput"/>
       </Unit21>
       <Unit22>
         <Filename Value="..\src\ce_projconf.pas"/>
@@ -264,7 +257,6 @@
         <ComponentName Value="CEProjectConfigurationWidget"/>
         <HasResources Value="True"/>
         <ResourceBaseClass Value="Form"/>
-        <UnitName Value="ce_projconf"/>
       </Unit22>
       <Unit23>
         <Filename Value="..\src\ce_project.pas"/>
@@ -290,12 +282,10 @@
         <ComponentName Value="CEShortcutEditor"/>
         <HasResources Value="True"/>
         <ResourceBaseClass Value="Frame"/>
-        <UnitName Value="ce_shortcutseditor"/>
       </Unit26>
       <Unit27>
         <Filename Value="..\src\ce_staticmacro.pas"/>
         <IsPartOfProject Value="True"/>
-        <UnitName Value="ce_staticmacro"/>
       </Unit27>
       <Unit28>
         <Filename Value="..\src\ce_symlist.pas"/>
@@ -303,7 +293,6 @@
         <ComponentName Value="CESymbolListWidget"/>
         <HasResources Value="True"/>
         <ResourceBaseClass Value="Form"/>
-        <UnitName Value="ce_symlist"/>
       </Unit28>
       <Unit29>
         <Filename Value="..\src\ce_symstring.pas"/>
@@ -312,7 +301,6 @@
       <Unit30>
         <Filename Value="..\src\ce_synmemo.pas"/>
         <IsPartOfProject Value="True"/>
-        <UnitName Value="ce_synmemo"/>
       </Unit30>
       <Unit31>
         <Filename Value="..\src\ce_todolist.pas"/>
@@ -320,7 +308,6 @@
         <ComponentName Value="CETodoListWidget"/>
         <HasResources Value="True"/>
         <ResourceBaseClass Value="Form"/>
-        <UnitName Value="ce_todolist"/>
       </Unit31>
       <Unit32>
         <Filename Value="..\src\ce_tools.pas"/>

src/ce_main.pas

@@ -238,6 +238,9 @@ type
     procedure InitMRUs;
     procedure InitWidgets;
     procedure InitDocking;
+    {$IFDEF LINUX}
+    procedure TryExtractNuxIcon;
+    {$ENDIF}
     procedure LoadSettings;
     procedure SaveSettings;
     procedure LoadDocking;
@@ -401,6 +404,9 @@ end;
 constructor TCEMainForm.create(aOwner: TComponent);
 begin
   inherited create(aOwner);
+  {$IFDEF LINUX}
+  TryExtractNuxIcon;
+  {$ENDIF}
   fMainMenuSubj := TCEMainMenuSubject.create;
   fActionHandler := TCEActionProviderSubject.create;
   //
@@ -500,6 +506,26 @@ begin
   fFileMru.OnChange := @mruChange;
 end;
 
+{$IFDEF LINUX}
+procedure TCEMainForm.TryExtractNuxIcon;
+var
+  fold: string;
+  fname: string;
+  png: TPortableNetworkGraphic;
+begin
+  fold := '/usr/share/pixmaps/';
+  if not DirectoryIsWritable(fold) then exit;
+  fname := fold + 'coedit.png';
+  png := TPortableNetworkGraphic.Create;
+  try
+    png.Assign(Icon);
+    png.SaveToFile(fname);
+  finally
+    png.Free;
+  end;
+end;
+{$ENDIF}
+
 procedure TCEMainForm.InitWidgets;
 var
   widg: TCEWidget;