From f38fe8b70a353cfc35d1cb3295dd743883bcfb96 Mon Sep 17 00:00:00 2001
From: Basile Burg <basile.burg@gmx.com>
Date: Sat, 30 Aug 2014 11:28:55 +0200
Subject: [PATCH] action updates for "view in mini explorer" actions

---
 src/ce_main.pas        |  7 +++++--
 src/ce_projinspect.pas | 10 +++++-----
 2 files changed, 10 insertions(+), 7 deletions(-)

diff --git a/src/ce_main.pas b/src/ce_main.pas
index 65822b7d..c2a2f0ce 100644
--- a/src/ce_main.pas
+++ b/src/ce_main.pas
@@ -711,8 +711,8 @@ begin
     hasEd := fDoc <> nil;
     if hasEd then
     begin
-      actEdCopy.Enabled := fDoc.SelAvail and fEditWidg.Focused;     // allows copy/cut/paste by shortcut on widgets
-      actEdCut.Enabled := fDoc.SelAvail and fEditWidg.Focused;      //
+      actEdCopy.Enabled := fDoc.SelAvail and fEditWidg.Focused;
+      actEdCut.Enabled := fDoc.SelAvail and fEditWidg.Focused;
       actEdPaste.Enabled := fDoc.CanPaste and fEditWidg.Focused;
       {$IFDEF MSWINDOWS}
       // close file : raises a segfault on linux UndoStuff.>>fList<<.Count...
@@ -730,6 +730,7 @@ begin
       actFileSaveAs.Enabled := true;
       actFileClose.Enabled := true;
       actFileSaveAll.Enabled := true;
+      actFileOpenContFold.Enabled := true;
     end
     else begin
       actEdCopy.Enabled := false;
@@ -750,6 +751,7 @@ begin
       actFileSaveAs.Enabled := false;
       actFileClose.Enabled := false;
       actFileSaveAll.Enabled := false;
+      actFileOpenContFold.Enabled := false;
     end;
 
     hasProj := fProject <> nil;
@@ -764,6 +766,7 @@ begin
     actProjRunWithArgs.Enabled := hasProj;
     actProjSource.Enabled := hasProj;
     actProjOptView.Enabled := hasProj;
+    actProjOpenContFold.Enabled := hasProj;
 
     actFileAddToProj.Enabled := hasEd and hasProj;
 
diff --git a/src/ce_projinspect.pas b/src/ce_projinspect.pas
index 2a4d1348..cca7c731 100644
--- a/src/ce_projinspect.pas
+++ b/src/ce_projinspect.pas
@@ -6,13 +6,12 @@ interface
 
 uses
   Classes, SysUtils, FileUtil, TreeFilterEdit, Forms, Controls, Graphics, actnlist,
-  Dialogs, ExtCtrls, ComCtrls, Menus, Buttons, ce_project, ce_interfaces, ce_common,
-  ce_widget, ce_observer;
+  Dialogs, ExtCtrls, ComCtrls, Menus, Buttons, lcltype, ce_project, ce_interfaces,
+  ce_common, ce_widget, ce_observer;
 
 type
 
   { TCEProjectInspectWidget }
-
   TCEProjectInspectWidget = class(TCEWidget, ICEProjectObserver)
     btnRemFold: TSpeedButton;
     imgList: TImageList;
@@ -141,9 +140,10 @@ begin
 end;
 {$ENDREGION}
 
-procedure TCEProjectInspectWidget.TreeKeyDown(Sender: TObject; var Key: Word;Shift: TShiftState);
+procedure TCEProjectInspectWidget.TreeKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);
 begin
-  if Key = 13 then TreeDblClick(nil);
+  if Key = VK_RETURN then
+    TreeDblClick(nil);
 end;
 
 procedure TCEProjectInspectWidget.TreeSelectionChanged(Sender: TObject);