forks
/
dexed
mirror of https://gitlab.com/basile.b/dexed.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

removed icon extraction routine 

handled by the cesetup
This commit is contained in:
Basile Burg 2015-06-05 03:27:02 +02:00
parent 95536e0147
commit 6fc63706f8
1 changed files with 0 additions and 26 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

26
src/ce_main.pas
View File

@ -234,9 +234,6 @@ type
procedure InitMRUs;
procedure InitWidgets;
procedure InitDocking;
{$IFDEF LINUX}
procedure TryExtractNuxIcon;
{$ENDIF}
procedure LoadSettings;
procedure SaveSettings;
procedure LoadDocking;
@ -400,9 +397,6 @@ end;
constructor TCEMainForm.create(aOwner: TComponent);
begin
inherited create(aOwner);
{$IFDEF LINUX}
TryExtractNuxIcon;
{$ENDIF}
fMainMenuSubj := TCEMainMenuSubject.create;
fActionHandler := TCEActionProviderSubject.create;
//
@ -502,26 +496,6 @@ 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;